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EDITORIAL 



Man, it's really starting to bug me. 

Everywhere I go, it's gloom and 
doom. It's never ceased to amaze me 
how the human race has to be misera- 
ble to be happy. The hottest news items 
are usually tales of violence, while the 
good things in life go largely 
overlooked. 

Unfortunately, things aren't much 
different in Atariland. It's become im- 
possible to discuss computing on our 
machines without getting inundated 
with complaints and dire predictions. 
Every message base on every on-line 
service is filled with dark mutterings, 
every Atari discussion ends up as a 
none-too-supportive gripe session. 

There's something we need to con- 
sider: the self-fulfilling prophecy. 

A self-fulfilling prophecy is a 
phenomenon that occurs when some- 
one believes something so intently that 
he unconsciously causes it to happen, 
either by giving up and doing nothing 
to prevent it or by actively bringing it 
about. And the self-fulfilling prophecy 
is not a phenomenon that affects only 
individuals; large groups can just as 
easily fall under its spell— take your 
average group of computer users, for 
instance. 

What's the point? Word-of-mouth ad- 
vertising and the self-fulfilling prophe- 
cy share the same bed. That's one of the 
great dangers inherent in this form of 
advertising. And when a company— 
rightly or wrongly — depends to a great 
extent on word-of-mouth to sell its 
product, it's taking a major gamble. 

Atari seems to have taken that gam- 
ble, and I'm not sure it was wise. 

You see, we Atari users have always 
been the underdogs; there's nothing 
new in that. When everyone else was 
buying Commodores and Apples, we 
stuck by our 8-bit machines with the 
undying loyalty of lionesses protecting 
their young. We didn't let the rest of 
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the world interfere with our pleasure. 

I think Atari has been counting on 
that loyalty to sell its STs. 

But as ST owners we seem to have 
metamorphosed into an entirely differ- 
ent creature. We can't accept that Atari 
isn't IBM or Apple. We refuse to be hap- 
py with what we have and instead 
spend most of our time wishing our 
STs were something they're not. We 
have expectations for Atari that can 
never be fulfilled and, like a parent that 
wants great things for its child- 
regardless of the cost or the child's 
desires— we place ourselves in the po- 
sition of watching the whole thing blow 
up in our face. The more Atari drifts 
from the image we want for them, the 
more restless we get; the more restless 
we get, the more we grumble; the more 
we grumble, the more we assure the 
self-fulfilling prophecy. 

No, I don't agree with everything 
Atari's done. But I am willing to as- 
sume that they, having a greater 
knowledge of their company's 
resources, know what's best for them 
and their business. 

At any rate, Atari's not going to 
change its image overnight, and it's un- 
reasonable for us to expect them to; 
just as it's unreasonable for us to ask 
them to ignore profit opportunities (for 
instance, video games or the European 
computer market) in order to become 
what we want them to be. Atari is go- 
ing to run their company according to 
their own rules, like it or not. We can 
only hope that those rules have been 
considered carefully. 

Fashions come and fashions go. To- 
day it's fashionable to criticize Atari. 
This bad press succeeds in only one 
thing: creating the self-fulfilling 
prophecy. Keep it up. The guy next 
door is listening very carefully, and 
he'll buy a Mac or an Amiga. That'll not 
only be his loss, but ours as well. JT 
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RoadWar 
2000 

SSI 

1 046 North Rengstorff Ave. 
Mountain View, CA 94043 
512K Disk $39.95 

by Steve Panak 

The underlying theme of this new 
game from SSI is somewhat less than 
original. Lately we've been inundated 
with post-nuclear disaster worlds filled 
with rebel gangs and mutants battling 
on the highways and byways of tomor- 
row. I've seen it in a number of books 
and movies, most successfully in the 
Mad Max series. Because of this large 
customer base, any game trying to cash 
in on this guaranteed market is going 
to have to be really good. Fortunately, 
Roadwar 2000 goes that extra mile. 

The time is the year 2000. The place, 
North America. Your goal, to control 
the continent and save the world. Your 
obstacles are numerous foot and road 
gangs, including cannibals, renegade 
national guardsmen, and mutants. A 
biological, rather than nuclear, attack 
has turned the clocks back hundreds 
of years and made our land one in 
which only the strong survive. Of 
course, later, when we're weakened, is 
when the bombs start dropping, 
poisoning the cities and ecosystems, 
and generally lowering everyone's 
standard of living. 

Roadwar 2000 starts with this popu- 
lar premise and adds ease of control to 
create a game that is both intriguing 
and enjoyable to play. After booting the 
disk your screen display fills with a 



map of a region of North America. The 
right portion of the monitor contains 
a status area showing your group's vi- 
tal statistics, such as the amount of sup- 
plies and fuel your band possesses. At 
the top are a number of pull-down 
menus from which you issue all of your 
commands. If you so desire, you can 
also control the game with the key- 
board. Throughout most of the game, 
you use only four options. By clicking 
the mouse in the direction you wish to 
move, your army advances down the 
road (or, sometimes, as circumstances 
require, off the road). 

After each move (which will cost you 
time, fuel, money, and possibly the 
lives of your entire band), you usually 
will want to do any or all of the follow- 
ing: search for loot, search for people, 
and search for vehicles. You require 
loot to keep moving (gas and tires) and 
to keep alive (food, medicine and 
weapons). You require new and 
stronger vehicles and people to replen- 
ish those lost in combat. 

The main object of the game is to 
bring together eight agents who will 
hopefully be able to produce an anti- 
dote to the disease that has infected the 
populace. You do this by assembling a 
group containing a number of fighters 
and vehicles, as well as a doctor, a drill 
sergeant, and a politician, who increase 
party health, morale, and charisma, 
respectively. As you build your army, 
you move between North America's 
major cities, looting, recruiting and 
controlling these metropolitan areas. 
Only after 50+ hours of conflict will 
you complete this game. Maybe. But if 
searching and looting were your only 
tasks, this game would quickly become 
a bore. Fortunately, (I guess) you are 
not the only ones on the roads. 

From time to time as you travel down 
the highways, you'll run into rival road 
gangs. When this occurs, there is no 
negotiation, no surrender. You must 
fight, and only one gang survives. As 
each confrontation occurs, you choose 
one of two combat options, tactical or 
abstract. An abstract battle simply 
computes and displays the winner. But 
if you choose tactical mode, you con- 
trol all aspects of the skirmish. You dis- 
perse your men among the vehicles, ar- 
range the vehicles into battle forma- 
tion, and then engage the enemy. In 
tactical mode, you can choose a quick 
resolution, which makes all the com- 
bat strategy decisions for you, or you 
can completely control the fight, train- 
ing Are on, and ramming and boarding 



enemy vehicles of your choice. Upon 
the successful completion of full tacti- 
cal combat, the number of vehicles al- 
lowed in your gang is increased by one, 
up to a maximum of 15. 

In addition to searching, moving, and 
fighting, other menus contain even 
more play options. Of course, you can 
save and restore games in progress. 
What is really great is that the game 
disk is unprotected (let's not pirate it!), 
and on your back-up copy you can save 
your position. This makes saving quick 
and effortless, with no need to ever 
swap disks. As far as play options go, 
you can examine the strength and size 
of your gang, get up-to-date statistics on 
supplies, transfer supplies in and out 
of storage caches (which may be estab- 
lished in cities), fix tires, and abandon 
vehicles and supplies. 

Being a simulation, this game allows 
for a high degree of realism. You have 
the choice of 19 vehicles, from motor- 
cycles to tractor-trailer rigs. Each vehi- 
cle is rated for speed, maneuverability, 
armor, as well as crew, supply, and fuel 
capacity. Similarly, each member of 
your gang (which could number in the 
thousands) is rated and promoted 
through five ranks of increasing skill. 
Injured people and damaged vehicles 
may be repaired, and throughout the 
land there are certain special items, 
such as snow tires, which help you 
along your way. 

If all this sounds like a lot, rest as- 
sured it is — and that's why the game 
is so good. The ease of play keeps you 
in high gear. You quickly learn the 
operation of the pulldown menus, and 
choices are made effortlessly with the 
mouse. 

Unfortunately, learning what to do is 
another thing. The manual, while su- 
perbly written, concentrates more on 
telling a story than explaining how to 
play the game. Even after reading it 
cover to cover you still may not know 
just what you're supposed to do. I 
would have liked to have seen some 
sort of quick-start chapter, defining the 
goal and providing useful hints. 

Due to the long nights I spent trying 
to conquer this game, I have to give a 
thumbs up to Roadwar 2000. Although 
its goal was not immediately apparent, 
it was easy to play, and, best of all, easy 
to enjoy. It is just another in a long line 
of games for the ST which establish the 
machine as the premier gaming com- 
puter available today. Jump behind the 
wheel of Roadwar 2000— you'll love the 
ride. // 



6 



June 1988 ST -Log 



RE 

VIEW 



Monitor 
Master 

Practical Solutions 
1930 East Grant Road 
Tucson, AZ 85719 
(602) 884-9612 
$49.95 

by Maurice Molyneaux 



Don't you just hate switching cables? 
If you have both an RGB and a mono- 
chrome monitor, or if you have a 
monochrome monitor and use a tele- 
vision for color programs, it can be a 
real pain to have to constantly pull out 
and plug in monitor cables. I did this 
for a year and a half, then one day I fi- 
nally broke down and did something 
about it. I bought Monitor Master, 
and my cable switching days were 
over. 

Monitor Master (MM) is a video 
switchbox, colored Atari gray, and just 
a bit bigger than your ST's mouse. Its 
only control is a single big, black but- 
ton on its face. Around back you'll find 
a cable that plugs into your ST's moni- 
tor port and four other jacks. Two jacks 
are designed to take ST monitor cables 
and are labeled "color" and "mono." In 
addition to these are two standard RCA 
phono jacks, labeled "audio" and 
"video." If you hook a standard stereo 
cable into the audio jack, you can then 
pipe sound from your ST to another 
monitor, or through your stereo sys- 
tem (Starglider takes on a whole new 
dimension when piped through some 
good speakers). If you have an RF- 
equipped ST (most 520STs and the rare 
1040STfm) you can hook a composite 
monitor, VCR, etc., into the video jack. 
If you use a monochrome monitor and 
a TV, you just plug the monitor into the 
proper jack and hook up your TV as 
always. 

The black button (MM's only control) 
is used to toggle between color and 
monochrome. Normally, if you're just 
using a TV by means of the RF modu- 
lator (if your machine has one) rather 
than an RGB monitor, you must still 
disconnect your monochrome monitor 
to run programs in low or medium 
resolution (though medium looks ter- 
rible on most TVs and composite mon- 
itors). When MM's button is pushed in, 
the monochrome monitor is disabled, 
and the RGB port, composite video jack 
or RF modulator can be used for out- 
put. When you want to go to 
monochrome, pushing the button so it 
pops into its out position disables color 
modes. 

For those of you who didn't know, 



the ST's monitor jack has a pin called 
"monochrome detect" which, when 
connected to a monochrome monitor, 
lets the ST know it's in monochrome 
mode. Since the monochrome display 
signal is different than that for color 
modes (for example, the mono monitor 
has a screen refresh rate of 70 times 
per second as opposed to the color's 
60), the ST will reset itself whenever a 
change occurs in the status of the 
monochrome detect pin. So, if you 
press MM's button while your com- 
puter is running, it will reboot. 
However, while doing this will reset the 
computer, I recommend that you turn 
off your ST whenever you perform this 
toggle, as doing so with the power on 
causes needless wear and tear on your 
computer. 

There's not much else to say about 
Monitor Master. It does its intend- 
ed job and does it quite well. The com- 
posite audio/video output is especiallj 
nice, because it allows you to hook up 
a VCR and tape your color graphics 
(only low resolution is worth the effort), 
in addition to hooking up to stereos 
and composite monitors. If your ST 
lacks an RF modulator (you can tell by 
looking at the back of the machine; if 
there's a jack with a TV icon above it, 
and a small slot with a channel 2/3 
selector switch, then you've got it— if 
not, you don't), then you clearly can't 
use the composite video output. 

However, Practical Solutions will 
soon be releasing the Video Key, a 
device which converts any ST's RGB 
output to a high-quality composite 
video signal (so don't you 1040ST and 
Mega ST owners despair). They also 
currently offer six-foot microfloppy 
disk-drive cables as well as numerous 
video cables; including special cables to 
hook up non-Atari RGB and multi- 
synch monitors. To put icing on the 
switchbox cake, if you're tired of 
switching cables between your mouse 
and a joystick, Practical Solutions is 
coming out with Mouse Master— the 
function of which I daresay we can all 
guess! 

So, if you're tired of those monitor 
cable-switching blues, get yourself a 
Monitor Master. // 
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READER 

COMMENT 



I just bought an Atari 1040ST, and I 
love it! It's going to take me a while to 
get used to using it (this is my first com- 
puter), but I'm looking forward to be- 
coming an "expert" soon. I'm having a 
little difficulty with the built-in disk 
drive, though. Sometimes when I boot 
the computer, the disk drive won't stop 
turning The busy light stays on, and I'm 
afraid that if I try to remove the disk and 
put in another one, I'll damage them. Do 
other people have this problem? Is there 
anything I can do?— Mary Williamson 

Dickson, TN 

The problem you're having is not un- 
typical of the 1040 ST. The fix is simple. 
When the drive keeps spinning, just 
pop the disk out and reinsert it. This 
will usually cause the drive to go back 
to normal operation. In your case, you 
don 't have to worry about doing damage 
to your disk, because nothing is happen- 
ing inside the drive except the motor 
spinning. However, you should never re- 
move a disk from the drive when it's be- 
ing written to (when something is be- 
ing saved). This could cause the data on 
the disk to become scrambled. 



I have a Supra 60MB hard drive to go 
along with my 1MB 520-ST. Every once 
in a while, when I turn on the com- 
puter, the hard drive icons don't come 
up properly. (I've got the drive parti- 
tioned into four logical drives C, D, E and 
F). I don't know if there's something 
wrong with the hard drive or with the 
boot software. The only way I've found 
to get it to work again is to turn every- 
thing off for a couple of minutes, then 
reboot it. Am I doing something wrong? 

—Greg Albertson 
Reno, NV 

You 're probably not doing anything 
wrong Greg; in fact, you discovered the 
proper solution to your problem on 
your own, although usually you don't 
need to turn off the entire system. Just 
turning off the hard drive for a few se- 
conds and then rebooting will usually 
correct this mysterious malady. 

I'm very confused (no wisecracks, 
please). In the editorial for the April ST- 
Log, Lee Pappas stated that the maga- 
zine's design was going to improve by 



"adding more color and incorporating 
more creative layouts." Flipping through 
the issue, I can't see any changes at all. 
ST-Log looks exactly the same. 

—Arnold Richards 
Columbia, SC 

The key words in that editorial were 
"in the months to come." It takes a great 
deal of time and planning to redesign 
a magazine. Also, much of the work for 
the April and May issues of ST-Log were 
completed at the time of the magazines' 
sale to the new publisher, and we decid- 
ed, in order to get the magazines on the 
stands as fast as possible, to use the 
completed material. There were no 
changes at all done to the April issue. 
By now, you 've received the May issue, 
and I'm sure you've noticed the new 
cover style and logo. The June issue will 
be the first issue that our new artists 
have been able to put their full efforts 
to. And, believe me, when you pull it out 
of your mailbox, you will see the differ- 
ence. 

Everyone these days is talking about 
desktop publishing, but I'm not really 
sure what it is they're talking about. I 
know they mean the process of publish- 
ing newsletters without having to go to 
a professional printing company, but it 
seems to me that there is more to it 
than that. I've got a 520ST, along with 
the usual assortment of word proces- 
sors, games, etc. But I don't have any 
software that mentions anything about 
desktop publishing. What exactly is 
desktop publishing? I currently do up 
a newsletter for a stamp collector's club. 
I "publish" it by typing it with ST Writer, 
printing out the pages on my Epson 
printer and then photocopying the 
result. Can I use my ST in a better way 
to help me put out this newsletter? 

By the way, I want to congratulate you 
on a fine April issue. Mouse-ka-mania is 
a super program! And CHKDSK has al- 
ready helped me repair dozens of my 
floppy disks. Keep up the great work! 

—Robert Ford 
Warwick, RI 

You have the basic idea behind desk- 
top publishing. In a general sense, it 
means using your computer to publish 
newsletters, forms and any other type 
of document without having to resort to 



fancy typesetting equipment. However, 
whether or not you utilize the services 
of a professional printing company has 
very little to do with the process of desk- 
top publishing. In many cases, docu- 
ment's that were designed using desk- 
top publishing software are printed just 
like any other publication— at the 
printers. It's how you create your 
"camera-ready copy" (the "master" from 
which your publication will be printed; 
in your case, the pages that you photo- 
copy to publish your stamp collector's 
newsletter would be your version of 
camera-ready copy) that differentiates 
desktop publishing from the more con- 
ventional publishing methods. 

A "professional" publication is 
designed and created using very expen- 
sive typesetting and photographic 
equipment. And the entire typesetting 
process is costly as well (especially if you 
need to do a lot of corrections to the 
"galleys," typeset copy in a preliminary 
form). For instance, if you were to bring 
a 20-page newsletter to a typesetter serv- 
ice, it would probably cost you nearly 
$1000 to get your camera-ready copy. 

This cost is frequently too high for the 
casual publisher, so desktop publishing 
came into being What you 're doing with 
your newseletter is, technically, desktop 
publishing, because you 're using your 
computer to design the document. 
However, what you seem to be unaware 
of is that there are several programs 
designed especially for the desktop pub- 
lisher. They allow you not only to type 
in text, but also to incorporate graphics, 
columnize and "justify" your copy, de- 
sign headlines, use different "fonts" 
(character designs) and "point sizes" (a 
character measurement) and utilize 
many other useful functions available 
only through quality desktop publish- 
ing software. 

There are several desktop publishing 
packages available for the ST, including 
SoftLogik's Publishing Partner, Time- 
works ' Publishing ST, MirrorSofL 's Fleet 
Street Publisher and Migraph's Easy- 
Draw (this last isn 't really a desktop pub- 
lishing program, but many people use 
it as one). All these programs (except 
Publisher ST, which is brand new) have 
been reviewed in past issues of ST-Log. 
You might also like to take a look at 
Maurice Molyneaux's article "Page Per- 
fect" in ST-Log #17 for a mini-tutorial on 
desktop publishing. 
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ST VIDEO 
DIGITIZER 




Digitize from any standard com- 
posite video source (e.g. VCR, 
video camera, etc.). Save digitized pictures into NEO or DEGAS™ file formats. 
This is the fastest digitizer available for the ST. Capture single frames in less than 
a second. Excellent for student, hobbyist, or to put pictures in your desktop pub- 
lishing projects. The picture above was taken with the ST Video Digitizer and 
printed directly on a laser printer. 



$ 



.95 



ST SOUND DIGITIZER 

Digitize real-world sounds from microphone, record player, 
tape recorder, guitar, etc. Play back through your amplifier 
or MIDI keyboard. The ST Sound Digitizer can be used to 
create music, experiment with sounds, edit short commercials, or use for voice mail. 
Very easy to use software provides powerful editing and mixing features. 
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[TIMEKEEPER 



This is our popular clock calendar plug-in cartridge. The $ 
Timekeeper comes complete with removable long life lithium 
battery ready to use. Just plug it into the cartridge slot and 
set up either an Auto folder or Accessory program to automatically set Time and 
Date each time you turn on your ST. 



29 



.95 



To Order: Call our toll free number or send M.O. plus shipping (call for rates). 
VISA, MC, C.O.D. welcome. California residents add 7% sales tax. 
NAVARONE 

1-800-624-6545 (Nationwide) 
Or (408) 378-81 77 (California) 

NAVARONE INDUSTRIES, INC. • 454 Kenneth Avenue • Campbell, CA 95008 

Prices and availability are subject to change without prior notice. DEGAS is a registered trademark ot Batteries Included, Inc. 

CIRCLE #113 ON READER SERVICE CARD. 




BOOT UP 
TO BIG SAVINGS! 



A I YEAR FOR ONLY $28 

SAVE $14 OFF THE COVER PRICE 

< 1 YEAR WITH DISK ONLY $105 




SAVE TIME AND MONEY 
SUBSCRIBE TO ST-LOG 

SAVE $14 OFF THE 
COVER PRICE WITH 
THE CONVENIENCE 
OF HAVING ST-LOG 
DELIVERED DIRECT- 
LY TO YOUR DOOR 
BEFORE IT EVEN HITS 
THE NEWSSTANDS! 
GET THE MOST OUT 
OF YOUR COMPUTER 
SUBSCRIBE TO 
ST-LOG 
TODAY! 



□ 1 YEAR @ $28 — SAVE $14! 
FOREIGN - ADD $7 PER YEAR 

□ 1 YEAR WITH DISK @ $105 
FOREIGN — ADD $15 PER YEAR 

□ PAYMENT ENCLOSED □ BILL ME 
CHARGE MY: □ VISA □ MC # 



MCFWW 
DCFWW 



EXPIRATION DATE SIGNATURE 

MONEY BACK ON ALL UNUSED PORTIONS OF SUBSCRIPTIONS IF NOT SATISFIED. 



NAME 



ADDRESS 



CITY 



STATE ZIP 

MAKE CHECK PAYABLE TO L.F.P., INC., P.O. Box 16928, N. Hollywood, CA 91615. Offer expires August 
31, 1988. Your first issue will arrive in 6 to 8 weeks. 



WATCH FOR IT! 




Medium or 
High Resolution 



ST Font 
Printer 

by Charles F. Johnson 

This month ST-Log is proud to 
present the second-place winner in out 
ST programming contest. Due to the 
size of the program, the source listings 
could not be printed in the magazine. 
The program (and all associated Hies) 
is available on this month's disk ver- 
sion and on the ANALOG Atari SIG on 
Delphi. 

ST Font Printer is a general pur- 
pose printing utility that will let you 
print any ASCII text file (up to 100K in 
size) to an Epson/Gemini or IBM- 
compatible printer, using a redefined 
character set or the default ST system 
font (the one you see on the screen in 
low- and medium-resolution color 
modes). Fonts can be printed in two 
sizes (single or double width). There is 
a Type-a-Line feature that lets you enter 



a line of text from the keyboard and 
print it with any font, very handy for 
titles. You can also create professional- 
looking four-line address labels using 
common 15/16 by 3V2-inch tractor-feed 
labels, up to 99 at a time (this feature 
can also be used to address envelopes). 

The program allows you to set some 
of your printer's special features to aid 
in producing a neatly formatted print- 
out. You can set the left margin and the 
line spacing, and skip over the perfo- 
ration on ti actor-feed paper. Text files 
with embedded TABs, such as those 
produced by the MicroEM ACS editor, 
will print with correct column 
alignment. 

ST Font Printer supports two types 
of fonts; fonts created by the DEGAS 
drawing program, or any 8-bit Atari 
font. The program also allows you to 
convert fonts from one format to the 
other. This is a fully GEM-based pro- 
gram written in 68000 assembly lan- 
guage; it will work on any ST with TOS 
in ROM, in either medium-res color or 
monochrome modes. 

How to use it 
To run ST Font Printer, its GEM 

resource file (STPRINT.RSC) must be in 
the same directory as the program. 
Just double-click on STPRINT.PRG and 
off you go! The "ST FONT PRINTER" 
window will open, a title box will dis- 
play, and the top menu bar will show 
the choices Desk (actually, an Atari 
logo), Exit, Fonts, Print, and Options. 
Click on the Continue button in the ti- 
tle box, and it will zoom away; now you 
can point at any of the menu choices 
causing a sub-menu to drop down. 
When you click on a drop-down menu 
item, the window's information line 
will show the option you've selected. 
The window's information line will dis- 
play all the current print settings and 
is updated every time you change 
something with the Set Print Options 
selection. Here are explanations of the 
various menus and sub-menus: 

Desk 

ST Font Printer— Click on this selec- 
tion to re-display the title box (in case 
you forget the name!). 

Exit 

Quit— Does just what it says, exits to 
the GEM desktop. You will see a dialog 
box asking you to confirm your deci- 
sion. You can also click on the close 
box in the upper-left corner of the win- 
dow to exit program. 



Fonts 

Load DEGAS Font 

Load Atari 8-bit Font— Choose one ol 
the font-loading functions, and an Item 
Selector box will appear. The default ex- 
tensions for the different font types are 
".FNT" for DEGAS and ".FN8" for 8-bit 
fonts. The window's title line shows 
which option you've chosen, as a 
reminder. To load a font you can either 
click once on the name of the font, and 
then click on the OK button, or simply 
double-click on the name itself; the 
Cancel button will abort the operation. 

If you wish to change the drive or 
pathname, type an up-arrow to move 
the cursor to the directory line, and 
edit the drive and pathnames, but don't 
press RETURN when you're done. In- 
stead, move the mouse cursor inside 
the file window and click once. This 
will show the new directory. (This is an 
inconsistency in Atari GEM— the IBM 
version of the Item Selector box will let 
you press RETURN after editing the 
directory line.) If you change the di- 
rectory line, be sure to include a full, 
legal GEM pathname, such as 
•A:\FONTS\ *.SET" (the backslash "\" 
after the colon is important). The pro- 
gram remembers the directories for 
each type of font so you'll only have to 
do this once. (You may also change the 
current drive for all file accesses by us- 
ing the Set Current Drive option; see 
below.) 

When the font is finished loading it 
will be displayed in a box at the bottom 
of the screen, and its name will be 
printed on the right side of the menu 
bar. Bear in mind that when you first 
run ST Font Printer, the custom font 
printing option is disabled and all 
printing operations will use the ST sys- 
tem 8 by 8 font. To print with a font 
you've loaded, you must go to the Set 
Options menu and enable it first (see 
below). 
Write DEGAS Font 
Write 8-bit Font— These options let 
you convert a font from 8-bit to DEGAS 
format, or vice versa. They are disabled 
(shown in lighter type) when the pro- 
gram is started; loading a font will en- 
able them. When you choose to write 
(store on disk) either type of font, the 
program will present you with the 
famed Item Selector box once again. 
The current font filename is used as 
the default name, with the correct ex- 
tension (".FNT" or ".FN8") automatical- 
ly appended to it. If the font name al- 
ready exists on the disk, you will be 
given the chance to change your mind 
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ST Font Printer 

or continue and over-write the existing 
file. 

Show User Font— When you first run 
the program this option is disabled, 
like the Write functions above. After 
you load a font file, it will be activated, 
and it'll display the name of the cur- 
rent font. Clicking on this selection will 
cause all subsequent drop-down menus 
and dialog boxes to use the current font 
for their text; the next time you pull 
down this menu, it will say Show Sys- 
tem Font, to allow you to switch back 
to the default ST system font. Please 
note that the font name shown in the 
window's info line is the one that will 
be printed, not the one you see on- 
screen. To set the front to be printed 
see below, under Set Print Options. 
Print 

Print File— Choose this and you'll see 
another Item Selector box; this one dis- 
plays all files with a ".DOC" extension. 
Make sure your printer is ready to go, 
and select the file. Another dialog box 
will appear to allow you to select op- 
tions for a title line. You can print the 
filename, date, and time in a special 
line of inverse text at the top of your 
printout, or choose not to print a title 
line at all. Click on OK— the mouse cur- 
sor will change to the "busy bee" and 
your printer will start chuckling away 
(actually, my printer sounds more like 
a screaming banshee). If you want to 
abort the printout, just press the Undo 
key. 

NOTE: ST Font Printer will display 
only print straight ASCII text files, with 
a maximum line length of 120 charac- 
ters. To print an ST Writer document, 
you should use the Print option from 
the main ST Writer menu to print it to 
a disk file. Since ST Writer prints to 
disk with full formatting, you'll proba- 
bly want to set the Skip Perforation fea- 
ture to OFF. If you use 1 st Word on 
the other hand, save your file with 
Word Processor mode turned off. This 
creates a text file with no formatting at 
all, so the Skip feature comes in very 
handy here. 

Type a Line— Lets you enter a line 
from the keyboard that'll be printed us- 
ing the current option settings dis- 
played in the window's information 
line (see below). After entering the line, 
you may either use the mouse and 
click on the OK button, or just press 
RETURN. This feature can be used to 
print titles and comments before or af- 



ter your listings. 

Address Labels— Choosing this op- 
tion brings forth a dialog box resem- 
bling a label, with four lines in which 
to enter text. To move from line to line, 
don't press RETURN; use the arrow 
keys to move up and down. You can 
also set the number of labels to print, 
in a box at the lower left. Just click on 
the up or down arrows and the value 
will change accordingly. The Undo key 
will abort a printout, just as with the 
Print File option. IMPORTANT; To cor- 
rectly align the labels you should set 
Skip Perforation to NO and set line 
spacing to 1/6 inch (see Set Options), 
and use labels that are 15/16 inch high, 
so it is exactly one inch from the top 
of one label to the next. 

Options 

Set Print Options— This lets you set 

When 

everything is 
the way you 
want it, click 
on the OK 
button. 

some of the printer's special features. 
A dialog box will appear with several 
toggle-able buttons and an editable text 
field. You may choose to print with 
small or large (double width) charac- 
ters, set Skip Over Perforation, choose 
which font you will print with, initial- 
ize the printer after printing a file, 
choose between several line spacings, 
or set the left margin wherever you 
like. 

To set the left margin, click on the up 
or down arrows next to the box. Click 
and hold the mouse button on the ar- 
rows to adjust the value quickly. 

If you choose not to initialize the 
printer, the perforation setting is 
retained for successive printing 
operations. 

The Options dialog box has a Cancel 
button that will reset the options to 
their initial states without exiting the 
box, in case you should happen to 
change your mind. When everything 



is set the way you want it, click on the 
OK button. Notice that the window's 
info line changes to reflect any choices 
you've made. 

Set Printer Type— This option lets 
you choose between two types of 
printers; a standard Epson or Epson- 
compatible printer (such as the Gemi- 
ni 10-X) or an IBM-compatible printer. 
If you have a Star SG-10, you can ena- 
ble its IBM mode by turning DIP switch 
2-2 off. 

Set Current Drive— Lets you select 
the drive which will be used for all file 
accesses. Up to 16 drives are support- 
ed, so you can use Ramdisks, hard 
disks, etc. 

ST Font Printer is pretty well error- 
trapped. If an error occurs during a 
disk operation, you'll see a box contain- 
ing a description of the error in English 
(not just something like "TOS error 
#33!). And if your printer isn't ready 
(power off, not connected, off-line, etc.) 
you'll see a box telling you that. If you 
get an "Insufficient memory" message, 
re-boot your system without any acces- 
sories or Ramdisks installed. 

NOTE: Some fonts created with the 
DEGAS font editor will not look right 
with ST Font Printer.This is because 
DEGAS uses an 8 by 16 font matrix, 
and ST Font Printer expects its fonts 
to be in an 8 by 8 matrix. Thus, when 
it loads a DEGAS font, it discards every 
other byte in the matrix, creating an 
8 by 8 grid from an 8 by 16 one. If some 
of the characters look a little strange, 
you can edit them with the DEGAS font 
editor. However, most of the DEGAS 
fonts I've tried do not need any editing, 
including the ones that are supplied 
with the DEGAS package. 

If you use the skip-over-perforation 
feature, I recommend you position the 
printhead about two line feeds below 
the perforation before you start print- 
ing. This will ensure that each page of 
text is centered. For address labels, 
remember to use the settings described 
above. You'll have to experiment a bit 
to find the best starting point for label 
printing. 

Charles F. Johnson is a profes- 
sional musician and, now, a semi- 
professional computer program- 
mer/reviewer/author. He lives in Los 
Angeles with his wife Patty, and 
Spike, the world's most intelligent 
cat. Charles is a SYSOLP on the ANA- 
LOG PUBLISHING Atari SIG on Del- 
phi; his user name is CFJ. & 
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r ANOTHER SUPERIOR PRODUCT FROM NAVARONE 



WHEN YOUR IMAGE IS AT STAKE, CHOOSE THE 

ST SCAN 
IMAGE 
SCANNER 



FOR YOUR ATARI ST SYSTEM. 



The flexibility 
to introduce 
art into desktop 
publishing. 




With the ST SCAN Image Scanner you can 
transfer your line art, photographs, logos, dia- 
grams, text, and other graphics into your 
computer. 

Capture your image sharp and clear with reso- 
lutions up to 300 dots per inch and with 32 
shades of grey. 

Navarone's high speed 
interface. 

Navarone combines the Canon IX-12™ 
Image Scanner with it's own High Speed Inter- 
face that plugs into the cartridge port of the 
Atari ST or Mega™ . 

Sophisticated software is provided to allow 
scanning in both line art mode and halftone 
mode. The ST SCAN Image Scanner prog ram 
is very easy to use and operates under GEM™ 
with simple click-on selections. 




It takes less 
than 15 

Seconds to scan 
in your image. 
Once digitized, you 
can use graphic 
programs like 
DEGAS™ to edit, 
crop, size or shape 
your image. 

You can put your image into final documents 
with Publishing Partner™ or save in Postscript 
to allow direct printing on postscript devices, 
such as the Linotronic 300™, Apple Laser- 
Writer™, or QMS PS 800™. 

Compatibility with graphic 
programs: 

Fleet Street Publisher™ by Mirrorsoft, Publish- 
ing Partner™ by Softlogik, Easy Draw™ by Mi- 
graph, or DEGAS™ by Batteries Included. 

The ST SCAN Image Scanner comes 
complete with scanner, interface, cable, 
software and manual for only: 



$ 1,239 



.00 



To Order: Call our toll free number or send M.O. plus shipping (call for rates). 
VISA, MC, C.O.D. welcome. California residents add 7% sales tax. 
NA VARONE 

1-800-624-6545 (Nationwide) 
Or (408) 378-81 77 (California) 




™ NAVARONE INDUSTRIES, INC. • 454 Kenneth Avenue • Campbell, CA 95008 



Prices and availability are subject to change without prior notice. Postscript is a trademark of Adobe; DEGAS is a registered trademark of Batteries Included, Inc.; Softlogik and Publishing 
Partner are trademarks of Softlogik Corp. ; Canon IX-12 is a registered of Canon, Inc. ; Atari ST is a registered trademark of Atari Corp. ; Apple LaserWriter is registered trademark of Apple 
Computer; QMS PS 800 is a registered trademark of Quality Micro Systems; Linotronic is a registered trademark of Linotype; GEM is a registered trademark of Digital Research Inc. 
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Expandable HARD DRIVE Kits 

fit the MEGA too! 

Install your own ST506 (PC No Drive...install your own$295 
clone) compatible drives. Two 3. When space is at a 
case styles with two different premium... 
host adapters are available: Latest 3.5" technology, RLL 
1. 10" x 6.5" x 15" with full with embedded SCSI contr., 
SCSI interface takes full advantage of the 

-room for up to 5 1/2 height 5 SCSI bus, extremely high 
1/4 hard, floppy or tape drives transfer rates, almost 
-150 W power supply instantaneous response, details 

-controller for up to 4 hard couldn't be finalized at press 
drives (Adaptec 5500) time, write or phone for latest 

- mounts on floor, under desk catalog! 
or on desktop 4. Upgrade your 520STor 

Complete kits, ready to plug in 1040ST/520STfm to the MEGA 
2 drives: standard, separate keyboard 

10 MB - $485 30MB - $675 and CPU, gain space for up to 3 
20 MB - $595 40MB - $845 5 1/4 - 3.5" hard or floppy 
no drive, install your own $385 drives. 



2. 13" wide x 15" deep x 3" 
high, MEGA form factor, 
single port host adapter 



Kit for 520ST with all $345 
parts, central power supply, 
delay for operation with hard d. 
-room for 3 1/2 height 5 1/4 or Kit for 1040/520STfm $295 
combination of full - 1/2 height More details with our catalog! 

- 3.5" drives Host Adapter cards, plug 

- 65 W power supply w. fan directly into the DMA port, 
-can be placed under the come standard with a 6" cable, 
monitor up to 20' feet and additional 
Compl. kits ready for 2 drives: daisy chained connectors opt. 
10 MB - $395 30 MB - $615 1 port - $79 full SCSI - $119 
20MB - $525 40 MB - $795 Software for form. + part. incl. 

MEMORY UPGRADES for520, 1040/520STfm: 

Up to Four Megabytes on ONE board with NO SOLDERING!!! 



$129 
$229 
$495 
$895 
$169 
$79 
$110 
$149 



Expandable 520ST boards 520A 
come fully socketed and use 520B 
256k DRAMS to upgrade to 
1MB and 1 Megabit DIP's for 520" 
2.5 and 4 MB upgrades. Go 520-2 
from 1 to 2.5 or 4 MB by install. 1040A 
16 or 32 1 Mb DRAM's! 10406 
1040ST/520STfm boards use 
only 1 Mb chips and upgrade to J040K 
either 2.5 or 4 MB. Clock option on memory board 

All memory boards fit under clock, standalone, 520 or 1040 
the R/F Shield With the CPU All clock upgrades come with software. 

completely available for any a^^u ^ _ i j ^ 

future enhancements (blitter, tech- Specialities Co. 
coprocessor etc.) and come 1 °22Hodgkins, Houston, tx 77032 
with a ONE YEAR ltd (713)590-3738,590-2068 
warranty Installation is totally a^t^S^^^,^ 
solder-free and easy with w.ausit. eon. Tel.- <09> 385-1765 
detailed illustrated instructions. liS^ 

now thai m popuihm boards - w»iin.o win, . - ih» Germanytlngenieurb. Oipl.-lng. M Krompasky 

**««*»9 » 7751 Grosswallstadt (06022) 24405 

ctilps ars nwdM par bar*. Pit. phona (or currant adlustmantm aw skwt. uosrtn, mosbmt mesa «. ragaurM vumaru <* ami corp. 



socketed, no RAM 
1 MB, socketed 
2.5 MB, socketed 
4 MB, the maximum 
1 MB, non-expandable 
socketed, no RAM 
1 bank sockets, no RAM 
fully socketed, no RAM 
1040C* 2.5 MB + 1 bank sockets $495 
4 MB, the maximum $845 
kit, equivalent of 1040A $ 68 
$30 
$38 



Panasonic Printers 
$165. 



uter Garden 

Wilkes-Barre & Scranton's Favorite Computer Dealer 




Model 10801-11. io- wide dot 
matrix. Tractor. t44 characters per 
second. Elite, pica and 
compressed. Great letter quality & 
graphics. Epson. Centronics 
compatible. Fits any computer. 
2- year warranty! 

Model 1091 i - 1 1 . As above 
except 30% taster. $189 



Star Printers 
NX-1000: 

$169 

NX-1000 Rainbow: $229 



Nashua Flo 

30 



Quantity 
5.25-SSDD 



5.25-DSDD 
5.25-DSHD 
3.5-SSDD 
3.5-DSOD 
3.5-DSHD 
High QuBlityLiletirne 
Rated best in Byte 



$19 
$22 
$39 
$39 
$48 
$144 



ppies 

100 200 
$55 $107 
$58 $113 
$109 $215 
$109 $215 
$139 $275 
$439 $869 
warranty-Boxed. 
magazine- 9/84 



Avatex Modems 



0e: (j 



$79 



2400: 
i$179 



Haves-compatible. Elegant. 



I040ST's: SCall 



1040ST prices include testing. 



Video Digitizers: 

Color Computereyes ST $179 
BSW Computereyes XL/XE$99 

Scanners: 

IMG Scan ST |B«W) $79 

ST Accessories: 

Monitor Master $44.99 
Mouse Master $34.99 




GFA Basi 
GFA Basi 
GFA Basi 



Antic 

Spectrum 512 
CyberStudio 

Intersect 
Interlink ST 

Michtron 

c interpreter 
c Compiler 
t Companion 
GFA BASIC Book 

Soft Lo&ik 

Publishing Partner 
Publishing Partner Pro. 
Font Disk #1 
Font Disk *2 

Dr Ts 

The Copyist 
KCS (Sequencer) 
MIDI Recordins Studio 
Timeworks 
Wordwriter ST 
Dalamanajer ST 
Swiflcalc ST 
Partner ST 

■ublish ST 



$55.99 
$69.99 

$24.99 

$38.99 
$38.99 
$32.99 
$24.99 

$64.99 
$119 
$19.99 
$19.99 

SCall 
SCall 
$25.99 

$48.99 
$48.99 
$48.99 
$32.99 
$C»II 



Toll-free order line: 

1-800-456-5689 

For information call 1-717-823-4025 

3% charge for VISA-MC- AMEX. Shipping charges extra 
Computer Garden. 106 W. Carey St., Plains PA 18705 
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CIRCLE #105 ON READER SERVICE CARD. 



ALICE 

The Personal Pascal 



An integrated programming environ- 
ment with 700 HELP screens, an editor 
that makes errors impossible, and the 
best GEM interface anywhere. Only 
$79.95. 

An excellent value. " - Antic 

It is about as painless a method of 
learning Pascal as can be devised 
short of hypnosis. It works!" - 
Computer Shopper 

The product is all anyone could ask 
tor. I would recommend this product 
to anyone who is considering learning 
PASCAL ... or anyone who wishes to 
prototype small applications which 
deal closely with GEM." - ST Informer 



Orders: 1-800-265-2782 

Looking Glass Software 
poop Jul Q\m 2o\f^m 

124 King St. N. Waterloo, ON. N2J 2X8 519/884 7473 
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ST- U.S. E. 

THE USED PROGRAM 
EXCHANGE FOR YOUR ST 

Trade Your Old Programs for 
Exciting New Titles 

Buy Quality ST Programs at a 
Fraction of the Original price. 

Over 250 Titles currently in stock 
New Arrivals Daily 

NOW SELLING NEW SOFTWARE 

Call or write today for a free price 
list and membership info. 

ST-USE 

314 Main Street 
Great Barrington, MA 01230 
(413) 528-4728 9 a.m. - 5 p.m. Eastern Time 
MasterCharge and VISA Accepted 
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j&Hr JmSF JBEw mk 

JtBMKKKmf JSSkwB^k^W .^W^™' MmaM 



GEAR UP YOUR 
DISK DRIVE 
FOR BIG SAVINGS! 

TO SUBSCRIBE TO ANALOG 

TURN TO PAGE 
TO SUBSCRIBE TO ST-LOG 

TURN TO PAGE 

SAVE MONEY AND TIME BY HAVING 
YOUR FAVORITE COMPUTER MAGA- 
ZINE MAILED DIRECTLY TO YOUR 
DOOR AT A FRACTION OF THE COVER 
PRICE! 



CircuifMdker 



CircuitMaker is a professional full featured 
program that enables you to design, construct and 
test an unlimited variety of digital circuits. Using 
CircuitMaker, you eliminate the need to purchase 
breadboards, integrated circuits, wire and power 
supplies. CircuitMaker allows you to design and 
test your digital circuits with just a few clicks of 
the mouse! 

CircuitMaker is designed for the professional as 
well as the student that is just learning about digital 
logic. CircuitMaker is a must for your electronic 
projects! 



iliad 

Software Inc. 



Only $79.95 

P.O. Box 1144 
495 West 920 North 
Orem, Utah 84057 
(801) 226-3270 

Office hours 10:00AM-6:00PM MST 




An incredible simulation 

Cardiac Arrest! 

with binder and manual, $69. 
See discounted package price. 

Cardiac Arrest! is a unique product. In this mathematically- 
based simulator, you interpret the history, on-screen EKG, lab 
data, and vital signs, then give treatment orders in plain 
English. While many computer users enjoy Cardiac Arrest! as 
a challenging medical adventure game, ifs a sophisticated 
product used world-wide for ACLS (Advanced Cardiac Life 
Support) education. IBM, Apple II + Ide, Atari ST, Atari XL/E. 
Antic: "impressive and amazingly complete" 
ST World: "both highly educational and fun to play" 

We support our products. Updates will be available to users for 
$6 each when ACLS recommendations change. Our software is 
NOT copy-protected. 

Cardiac Arrest! $69 

ACLS Protocols $29 

EKG Teaching $29 

CardioQuiz $19 

Blood Gases $24 

QuizPlus $29 

Demo $7 

Ask about the four-disk ACLS Package (includes Cardiac Arrest!) 

for $109. Order direct! 

Mad Scientist Software 

2063 N. 820 W, Pleasant Grove, UT 84062 
Visa/MC ordeis call 801-785-3028 
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by Mike Donahue 



Even the 
most noble of 
policies is 
subject to 
reality. 



He must be a miracle worker. Near- 
ly four years ago, Jack Tramiel, the 
founder of Commodore, purchased 
Atari, Warner Communications' 
"problem child," and borrowed from 
Warner the $240 million needed to do 
it. Then in a flurry of activity he eman- 
cipated the bloated Atari from all its es- 
cesses and extravagances, fired thou- 
sands of employees worldwide, consoli- 
dated the operations of the 40-building 
Silicon Valley headquarters into a sin- 
gle two-story building and concentrat- 
ed all manufacturing in one Taiwan fa- 
cility. He trimmed Atari to a mere 
skeleton of its former self, enabling it 
to weather even the most destructive 
of financial storms. 

But after giving Atari a new lease on 
life, Tramiel had a rude awakening: The 
marketplace was vastly different from 
what he was used to at Commodore. 
The impact of low price in the low-end 
computer marketplace was waning, a 
fact made clear by the very poor sales 
of the new $89 Atari 65XE home com- 
puter. Outside of a price war, Tramiel 
is like a fish out of water. The name of 
the game had become marketing su- 
periority, a game which he deplores. 

He looks disdainfully upon compa- 
nies like IBM and Apple that succeed 
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more through image and advertising 
than through the merits of their 
products. "You can't compute with im- 
age; you have to compute with a com- 
puter," he is fond of saying. 

But even the most noble of policies 
is subject to reality, and Tramiel's 
bona-fide methods are becoming in- 
creasingly less effective as consumers 
respond more and more to demagogic 
advertising. Few Atari enthusiasts 
would deny that in terms of price and 
technological superiority, the Atari ST 
is the best personal computer on the 
market today. For a computer to offer 
the same technology as the Apple 
Macintosh at less than half the price is 
astounding. But to include in the same 
price color, standard input/output 
ports, a built-in hard-disk port, and 
higher resolution graphics, is revolu- 
tionary. So, where's the revolution? 

The answer lies in the fact that never 
before has marketing had the profound 
importance that it has in this decade. 
In today's marketplace, the prolifera- 
tion of cutthroat competitors has made 
it most difficult to sell a superior 
product unless it is backed by an arma- 
da of the most clever and calculated 
marketing strategies around. With this 
fact emerging, it can be said that the 



need to design a clearly superior 
product stands in the shadow of the 
need to develop preeminent marketing 
strategies. Some firms demonstrate 
such marketing prowess that they can 
even make a best seller from a product 
of inferior technology. (Right, IBM?) 

Yet, Atari is laboring under the mis- 
apprehension that if it simply provides 
the technologically best product in its 
class it will impose it on the market- 
place. This antiquated "better 
mousetrap" philosophy no longer 
holds true in the contemporary Ameri- 
can marketplace. If Atari honestly be- 
lieves the ST is a better product than 
the Macintosh, it must find it puzzling 
that the Mac outsells the ST many 
times over. Apple peddles a cool 60,000 
Macintoshes per month. The Atari St's 
success has been hampered not by 
technological inferiority, but lackluster 
marketing. 

What's in a name? 

At the time of Jack Tramiel's pur- 
chase of Atari, many argued that hav- 
ing discarded so much of the compa- 
ny's technological resources, he had es- 
sentially paid $240 million for intan- 
gible items: the Atari name and sym- 
bol. While this is nothing new to the 
history of business, which is rife with 
events in which million-dollar transac- 
tions involved merely a name or logo 
(Victor Kiam paid $25 million for little 
more than the Remington name), this 
instance stands out. To many, Atari is 
still thought of as some corporate giant 
that has enormous strength backing 
each product. "Atari" is a relatively old 
name that is in the heads of millions 
of people all over the world and has 
possibly more recognition than "Com- 
paq" or "Tandy." 

Because Tramiel realized that a start- 
up computer company would have lit- 
tle chance succeeding in the ferocious- 
ly competitive marketplace without 
name recognition, Atari was of prime 
value to him. But although name recog- 
nition is an assessable commodity, 
Atari's may be the wrong kind for the 
purposes of Tramiel and sons. The per- 
ception as a game company is the sin- 
gle biggest problem facing the compa- 
ny, eclipsing its numerous accomplish- 
ments. 

The Atari name stands as a roadblock 
to the lucrative business market. And 
name problems can't even be eluded in 
the area where Atari products are the 
most well received: the music industry. 



For as the May '87 issue of ST-Log re- 
vealed, many professional musicians 
cover up the nameplates with gaffer's 
tape before bringing their Atari com- 
puters to the studio. 

Ironically, it was reported in In- 
foworld that Atari was once attempting 
to garner a defense contract for its up- 
coming 32-bit computer. Absurd 
thoughts come to mind when trying to 
imagine what the outcome might have 
been if they had succeeded. A startling 
Washington Post headline may have 
read "U.S. Defense Uses Atari Com- 
puter!" And Soviet leader Mikhail Gor- 
bachev might be quoted as saying, "I 
sincerely hope they aren't using them 
in their missile silos." 

Even in the education market, Atari's 
name may act as a hindrance. One can 
imagine that if Atari computers began 
cropping up in schools, angry PTA 
members might protest, "I was ap- 
palled to learn that our children are us- 
ing Ataris in the classroom!" 

Setting aside the voluminous blun- 
ders, one has to admit that the perfor- 
mance of Warner's Atari, Inc. in creat- 
ing an image of the No. 1 video-game 
company was irreproachable. Little did 
Jack Tramiel know that Atari was an 
inextricable part of an unsavory pack- 
age deal: With ownership of the com- 
pany came the onus of undoing what 
Warner's Atari did so well during the 
video-game craze. The effects of a suc- 
cessful marketing campaign can last 
indefinitely and thus, the marketing 
successes of Atari, Inc. haunt the new 
Atari Corp. today as it emphasizes 
computer products. Perhaps many a 
potential Atari computer sale fizzled 
when the salesperson's sermon about 
the superior features was drowned out 
by the "Have you played Atari today?" 
jingle playing incessantly in the 
prospective customer's head. 

Indeed, when the company first 
changed hands, its newly recruited ex- 
ecutives expressed a strong desire to 
alter Atari's image. Sigmund Hart- 
mann, newly assigned head of soft- 
ware, acknowledged in a Compute! in- 
terview that the old Atari sought to be 
recognized mainly as a video-game 
company. "We definitely want to 
change that," he said. The new empha- 
sis was to be recognized as a computer 
firm. But its reasoning seems some- 
what paradoxical when the company 
laments its video-game image while it 
continues to sell video games. 
Atari's argument is that it seeks to 
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capitalize on the fad's reappearance 
and then break camp when it withers. 
However, the expense of milking this 
"cash cow" today is the furtherance of 
irreparable damage to Atari's image, 
and the limiting of the company's fu- 
ture as demand continues to circum- 
vent low-end computer markets in 
favor of vertical markets. 

Retired U.S. Navy Rear Admiral 
Grace Hopper, known as computing's 
"first lady," once illustrated the pow- 
er of a name quite well. In an Informa- 
tion Week magazine interview, Hopper 
said, when discussing today's com- 
puter power in relation to the past, "We 
never should have called them 
microcomputers. Because . . . you can't 
make anybody believe that they're 
more powerful than the mainframes 
were a couple of years ago." As some- 
one who understands the importance 
of names, Hopper might agree that 
Atari's is a hindrance even though the 
company sells computers far more 
powerful than the school-bus-sized 
Mark I mainframe she once used in the 
Navy. 

Atari has excellent products. Though 
not a panacea for all its perplexities, a 
new image could help Atari gain en- 
trance to many important markets. 

All or nothing 

An accepted truism among modern 
marketers is that it is nearly impossi- 
ble to unseat a champion from the No. 
1 position. (Pepsi or Burger King will 
attest to this.) Given this, an historic 
event must have just occurred because 
a No. 1 slot was recently usurped by 
Nintendo, now the leader in video- 
games. Atari has become No. 2, fol- 
lowed by the No. 3 Sega. So, it would 
appear Atari went only halfway in its 
obstinate pursuit of the resurrected 
fad, making itself susceptible to a Nin- 
tendo coup. Those Japanese who 
Tramiel is so deathly afraid of outwit- 
ted him with technological innovation. 
(Who would have thought a video-game 
machine could be equipped with a 
moving robot?) 

It would be in Atari's interest to have 
a binary position on the video-game 
market: in or out, on or off, all or noth- 
ing. If the video-game arena is the com- 
pany's chosen domain, it should try 
vigorously to reclaim its leadership po- 
sition there. But if the company waits 
to occupy computer territory, the 
"nothing" approach would have a far 
healthier effect on the Atari name. The 



company has instead opted for the 
"have cake and eat it too" approach, ex- 
pecting to dispel its video-game image 
in the midst of selling video games. The 
only feasible way for Atari to capitalize 
on the boom without fueling the video- 
game connotations is to sell the 
machines through a subsidiary with a 
different brand name. If Atari were to 
select and vigorously promote an im- 
aginative new name, it could pursue 
the video-game market with unbridled 
voracity while sheltering its name 
from further injury. 

It would seem like a waste of the 
Atari name to start completely from 
scratch in this market with a name 
void of such recognition. Yet who but 
the most diehard arcadegoer had heard 
of Nintendo or Sega? In spite of this 
vexing problem, Nintendo managed to 
become the leader in the video-game 
market, and Sega was able to establish 
a stronghold. 

The equity in the Atari name is ob- 
solete if the market doesn't exist 
tomorrow. As the video-game fad 
makes its small, unspectacular come- 
back, there is no guarantee that it 
won't deflate again, possibly to extinc- 
tion. Perhaps the present state of this 
ephemeral fad can be likened to Hal- 
ley's comet's second pass through the 
solar system before it blasts into 
oblivion. 

Home doldrums 

The cancer that killed the video-game 
spread to the home computer as well. 
Just years ago, Timex was able to ped- 
dle oceans of its $100 Timex Sinclair, 
a desktop calculator-size computer 
with a 2K memory, rudimentary black- 
and-white graphics, a flat membrane 
keyboard, and almost no software. 
Somewhat indicative of the vitality of 
the present market, the $89 Atari 65XE 
computer with a 64K memory, 256 
color graphics, full-stroke keyboard, 
and 2,585 pieces of software is on the 
verge of being discontinued due to dis- 
appointing sales. 

Apparently, the home computer, like 
the video games, was exemplary of 
computer technology which, by being 
used for amusement, was turned into 
a fad item. After curiosity was ap- 
peased, the home computer lost its pur- 
pose. A computer is a serious tool, just- 
like a hammer. A hammer isn't bought 
for amusement; it has a purpose, a 
function. But alas, it's almost as if the 
home computer bellows, "Give me a 
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purpose or give me death!" 

A Chain Store Age trade magazine 
survey revealed that 76.7% of shoppers 
did not know what they would do with 
a home computer if they bought one. 
Sure, a home computer can balance a 
checkbook, but automating such a sim- 
ple task as this for novelty's sake can 
only overcomplicate and slow the 
process. A home computer can't make 
toast, can't clean the rug, can't give you 
a really close shave, and therefore, a 
home can survive without one. Maybe 
all those millions of home computers 
were purchased solely for game-playing 
purposes, making them slightly more 
esteemed video games susceptible to 
the fad's expiration. 

Today, the breadth of home- 
computer buyer types has sharply nar- 
rowed, leaving but a rare species called 
the hobbyist. Still, Atari maintains that 
the home computer market is alive and 
kicking. The company gauges the mar- 
ket's viability by the excitement dis- 
played at Atari enthusiast fairs. By the 
conventions of Atari 's logic, one would 
measure America's current interest in 
Star Trek by the level of enthusiasm at 
a Star Trek convention. 

Word of life 

It appears that the only segments of 
the home market that have truly sur- 
vived are word processing and educa- 
tion. Even the much-touted "home ap- 
pliance control" market hasn't in- 
spired much more than a yawn. But 
the existence of the low-end word- 
processing market has prompted the 
creation of the $649 Magnavox 
Videowriter and similar specialized 
word-processing machines. Having 
done their marketing-research home- 
work, the makers of these machines 
have discovered the demand for a com- 
puter dedicated solely to word 
processing. 

While these machines seem like 
wastes of money to the computer-wise, 
Their beauty lies in their simplicity: 
They only do word processing and ap- 
peal to the nontechnical consumer 
who is confused and intimidated by the 
diversity of functions of a home 
computer. 

With the proper arrangement of 
peripherals, including a 1027 letter 
quality printer, the Atari 130XE com- 
puter could easily be sold as a word- 
processing machine. Just recently, 
Atari found it necessary to sell another 
computer under a different guise: the 



new $150 XE video game which is tech- 
nically identical to Atari's $89 65XE 
computer. Similar ingenuity can be ap- 
plied to seize a sizable portion of the 
low-end word-processing market. 

At the realistic price point of $600 for 
an Atari computer-cum-word proces- 
sor, Atari could immediately undercut 
the competition— something Jack 
Tramiel is notorious for. Moreover, 
with a 1027 letter-quality printer 
Atari's word processor would have an 
obvious advantage over the others that, 
with the exception of expensive models 
from Video and Brother, have dot- 
matrix printers. 

One Atari reseller has already spot- 
ted the new trend: in magazine ads, 
JS&A (heralding the "Products That 
Think" slogan) portrays the Atari 
130XE as a space-age typewriter that 
will forever change the face of typing. 
Apparently, "home computer" just 
doesn't cut it among consumers any 
longer. At least they know what they'll 
use a space-age typewriter for. 

A lion's share of the education 
market— 60 %— belongs to Apple. Fol- 
lowing Apple is Tandy, with impressive 
sales of its IBM-compatible Tandy 1000 
to educational institutions. And IBM is 
making another go at this market— the 
first being with its failed PCjr, a disap- 
pointment by IBM-standards— with a 
somewhat impressive networking PS/2 
model 25. Atari would be forced up 
against the ropes if it tried to claim a 
share of this market through conven- 
tional means. 

But innovation transcends even the 
biggest of marketing dilemmas, allow- 
ing the smallest of companies to join 
the higher ranks without the necessary 
marketing muscle. Innovation— not su- 
perior marketing— allowed Nintendo to 
become the No. 1 video-game maker. 
Offering schools something innovative, 
something that can't be found on com- 
petitors' machines, may be Atari's only 
ticket to schools. 

Nintendo warfare 

To expect Atari to whip up a techni- 
cal innovation overnight is a bit much. 
But such expectations are unneces- 
sary, as Atari has such a breakthrough 
already in its possession. For well over 
two years it has had a working CD-ROM 
(Compact-Disk ROM) drive and the 
necessary system software under 
wraps. Although many large firms are 
privy to the technology, the CD-ROM 
has yet to be unleashed in droves. It is 
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probably not a consumer item— at least 
not at its current price— but in schools 
and other institutions, it could revolu- 
tionize research methodology due to its 
550-megabyte storage capacity. 
Elementary schoolchildren could more 
adequately tap the endless resources of 
an encyclopedia.The optical drive could 
even escort Atari into the public 
library. 

But while schools and institutions 
could pay for the CD-ROM painlessly, 
Jack Tramiel refuses to disseminate 
this technology until it meets his price 
destination. How considerate. But 
while Tramiel engages Atari in a wait- 
ing game, Apple or IBM is free to in- 
troduce the CD-ROM, thereby quickly 
establishing either as the first and fore- 
most source of this technology. 

A company is only recognized as a pi- 
oneer or innovator if it is first to bring 
the innovative product to market. And 
although a unique relationship be- 
tween Activenture and Atari wrought 
the first CD-ROM solution, Apple may 
very well swipe the credit by simply in- 
troducing the CD-ROM first. Worse, if 
Apple does so, it will cement the mo- 
nopoly it already has on the education 
market, and its position will become 
virtually tamper-proof. For Atari, being 
first with a CD-ROM drive would ena- 
ble it to leapfrog the murderous com- 
petition. In short, the CD-ROM is the 
key to permeating the barriers that 
have prevented Atari from having a 
stake in the education market. 
Beautiful music 
A brilliant aspect of the Atari ST's de- 
sign was the inclusion of MIDI (Musi- 
cal Instrument Digital Interface) ports 
as standard equipment. Virtually every 
synthesizer on the market has MIDI 
ports. And until recently, while count- 
less MIDI synthesizers existed, the 
missing link— the computer to conduct 
the peripherals— had yet to appear. 
Now, with the exception of the obscure 
Yamaha CX5M, the Atari ST is the only 
MIDI computer on the market. 

Interestingly, an Amiga, IBM PC, and 
even a Macintosh can be configured 
with MIDI ports. Apparently a com- 
puter with a feature that exists as stan- 
dard equipment has the advantage of 
appearing somehow more suited to the 
appropriate task. So, by virtue of being 
MIDI equipped, the Atari ST has the im- 
mediate upper hand in the music mar- 
ket. The ST has, in fact, been greeted 
with excitement by musicians. 
Yet the computer was discovered not 



through advertising, but through the 
desperate quest by musicians for a 
MIDI computer. All ST advertising that 
targets musicians has been done in 
software ads by Hybrid Arts, a MIDI 
software Arm. Atari has yet to advertise 
autonomously. While it may seem con- 
venient and economical to be able to 
virtually ignore a market and still en- 
joy success there, the full capacity for 
success can't be realized without active 
pursuit. And if this market's potential 
were to attract any noteworthy compe- 
tition, Atari might not be able to hold 
its ground after failing to minimize 
danger by establishing an identity as 
the foremost MIDI computer supplier. 

In the new age of marketing, called 
the "positioning era" by Trout & Ries, 
Inc., a New York advertising firm, the 
most secure place for a company is the 
No. 1 position in a given market— even 
a niche. Yet Atari is adamantly opposed 
to pursuing niche markets on the be- 
lief that a company becomes trapped in 
such markets and loses its ability to 
compete effectively in broader ones. 
Atari's "claustrophobia" is unwar- 
ranted—even IBM captures niche 
markets. 

An uncontested niche poses an op- 
portunity to claim a very large piece of 
a small pie. But in the case of the MIDI 
market, the pie might not be all that 
small. According to the New York 
Times, sales of computers and software 
for MIDI uses recently topped $500 mil- 
lion. So the MIDI niche may be boom- 
ing bigger than the video-game market. 
Perhaps sadder than a company's 
failure to create new opportunities for 
itself is its failure to exploit opportuni- 
ties which already exist. MIDI is one 
such opportunity. 

Apple too 

It's comforting to note that Atari 
doesn't have a corner on the market for 
image problems. Tandy is currently 
hog-tied by a home computer/Radio 
Shack image as it tries— so far unsuc- 
cessfully—to crack the business mar- 
ket. And Apple, of all companies, has 
found gaining space on the corporate 
desktop to be a Herculean task. It 
seems that Apple computers were 
recognized for their place in homes 
and schools, not businesses. An at- 
tempt to make the Apple name denote 
"business" in addition to "home" 
would be futile. The public will remem- 
ber Apple's original identity for a long 
time to come. 

Before marketing whiz John Scul- 
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ley's arrival, Apple had been hammer- 
ing away, trying to penetrate the busi- 
ness market with the Macintosh com- 
puter. Sculley then managed to help 
the Macintosh overcome the ill effects 
of Apple's unbecoming image. The 
word "Apple" is noticeably absent from 
current Macintosh commercials. The 
concept being sold in these ads is that 
of "Macintosh," a word without 
preconceptions. 

Which does a Crest commercial sell: 
the name Crest or its maker's name, 
Proctor & Gamble? Is a Sanka commer- 
cial selling the name Sanka or Gener- 
al Foods Corp. the name of its maker? 
The same techique is being employed 
to disassociate Apple from Macintosh. 

Meanwhile, Apple's image is profiting 
from the Macintosh (an interesting 
contrast to the classic situation). The 
results have been phenomenal: Apple 
is now the No. 2 personal computer 
maker after IBM (with help from desk- 
top publishing). Even the IBM clone 
makers follow Apple, which became 
No. 2 two without any help from IBM 
compatibility. 

While it has not yet attained notori- 
ety as a computer company, Atari is 
making overtures to corporations. Soft- 
ware president Sigmund Hartmann 
has been assigned the laborious task of 
negotiating sales of Atari STs to For- 
tune 1000 companies. Perhaps to Mr. 
Ilartmann's chagrin, many a nearly 
consummated sale has dissolved when 
an executive with buying power caught 
a glimpse of an Atari video game in a 
Zayre flyer (to say nothing of a Toys 'R' 
Us flyer). 

But alas, Jack Tramiel isn't truly 
comfortable selling to the business sec- 
tor. He is most at home, at home. In his 
forward to an ST Logo tutorial, he inti- 
mated his devotion to making the 
highest possible technology available to 
the average home by means of vigorous 
cost reduction. There's almost an air of 
benevolence about Mr. Tramiel as he 
pursues this noble obsession. 

While it's not fun to critique some- 
one's ruison d'etre, it's hard not to 
wonder about the future. If Tramiel 
continues on his present course, will 
he eventually bring the price of a Cray 
supercomputer to within the family 
budget? A tantalizing, albeit sarcastic 
thought to ponder until better reason- 
ing provokes a pertinent query: How 
many homes are in demand of the pow- 
er of a Cray supercomputer? 
No matter how good a bargain is, fam- 



ilies won't buy something they can't 
determine a use for. Businesses, on the 
other hand, will always crave the most 
advanced computer technology and 
can use it constructively. Therefore, 
unlike the home market, the future ex- 
istence of the business market is a cer- 
tainty. With the home market's loss of 
viability, Atari's acceptance into the 
office is not a mere ideal, but a neces- 
sity for survival. Atari's future could 
hinge on whether it can establish a 
reputation as a computer maker today. 

The business-computer market is 
driven more by need than by want. Un- 
like consumers, businesspeople can ill 
afford the luxury of being fickle. Ask 
a typical businessman to imagine a day 
in which all the office's personal com- 
puters were broken down. He will, un- 
doubtedly, paint a grim picture that 
makes their necessity more apparent. 
Businesses depend on computers. The 
need for business PCs is as lasting as 
the need for automobiles. 

Full service 

Naturally, customer satisfaction is 
pivotal to success. And indeed. Jack 
Tramiel believes that buyer satisfaction 
today ensures repeat customers in 
the future. In a 1985 interview with 
ANALOG Computing, he said, "Intelli- 
gent companies are going after the long 
term — not to cheat the customer, not 
to be greedy." 

But here surfaces a pertinent issue. 
Atari has often been attacked for its 
poor service and repair provisions. Cus- 
tomer satisfaction certainly is affected 
by the facility of getting the computer 
fixed when necessary. This is especial- 
ly true in a business setting, where 
productivity grinds to a halt when com- 
puters break down. Under Jack 
Tramiel, Commodore was notorious for 
its watery commitment to servicing its 
computers. Apparently, when Tramiel 
said, "Atari will become no different 
from the old Commodore," he intend- 
ed to be taken literally. 

Long-term strategy is vitally impor- 
tant to future growth. But a dangerous 
assumption can be made when a trend 
is misread. In a recent Infoworld arti- 
cle, Tandy's Graham Beachum, then 
president of Computer Merchandising, 
outlined Tandy's strategy for penetrat- 
ing the business market. Beachum, 
who recently defected to Dell Com- 
puter, claimed that a buyer of a Tandy 
home computer will, without doubt, 
return to Tandy if the need for an office 
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computer arises. 

His logic is invalidated by consumer 
behavior. The move from a home com- 
puter to a business computer is not 
seamless, as the consumer mind seems 
to draw a clear distinction between the 
two types. When a home computer 
owner decides to "get serious" by in- 
vesting in a business computer, he'll 
turn to a different company, one that 
is indigenous to the business milieu. 

IBM made the opposite, albeit equal- 
ly fatal assumption with its PCjr home 
computer. While it accounted for only 
1% of total revenues, the PCjr might 
sell a few mainframe computers a de- 
cade or so down the road, thought IBM. 
But the hypothesis proved untestable 
as poor junior never really made it into 
the home. Why? Because, as ac- 
knowledged by Al Ries and Jack Trout 
in their book Marketing Warfare 
(McGraw-Hill, 1986) IBM is renowned 
not for its place in the home, but in the 
office. Apple and Commodore laid 
claim to the home. 

Atari, under a similar illusion, be- 
lieves that all the youngsters who grew 
up on its video games are now mature 
enough to want computers and will 
stick with Atari. Once again, the fly in 
the ointment is Atari Warner's splen- 
did job of establishing Atari as the first 
name in videogames. 

"Atari" actually became synonymous 
with "videogame." This potentially 
desirable effect occurs when a product 
assumes its closely associated brand 
name: "Xerox" became a surrogate for 
"photocopy"; "Jell-O" substituted for 
"gelatin"; "Band-Aid" for "plastic band- 
age"; "Kleenex" for "tissues"; "Vase- 
line" for "petroleum jelly." Here the 
brand name becomes generic. 

During the video-game craze, kids be- 
gan to refer to video-game machines in 
general as "Ataris." A distinction 
wasn't even made in reference to video- 
game units of other manufacturers! 
While this generic brand name may 
have been Atari's richest asset during 
the heyday of the video-game craze, it 
haunts the company today as it strives 
to sell personal computers. 

The logic that says that kids will 
graduate from Atari video games to 
Atari computers is flawed. They will 
graduate from "Ataris" to computers. 
They'll turn to a totally different com- 
pany to provide a computer than they 
turned to for video games. Again, un- 
til the Atari's name denotes computers, 
the company will continue to have lit- 



tle impact on the computer industry. 

An equally feeble belief Atari clings 
tenaciously to is that a new generation 
of kids is emerging that hasn't yet been 
exposed to video games, and will foster 
a new craze reminiscent of 1982. But, 
unfortunately, this false hope has about 
as much validity as one that insists that 
today's Americans will soon be listen- 
ing to Rossini because they are of a new 
generation that hasn't yet experienced 
classical music. Times change. 

Foot in the door 

Given that the demand for business 
computers shall exist as long as busi- 
nesses exist, Atari does have reason to 
set its sights on the office. To get there 
will take exceptional products, excep- 
tional marketing strategies, and most 
importantly, a reputation as a com- 
puter maker. Atari has one essential in- 
gredient: exceptional products. 

The new IBM compatible Atari PC, if 
properly marketed, might help pry 
open the corporate door. Hopefully, 
Atari views this product as a part of a 
strategy, not just another way to make 
a fast buck. If IBM compatibility gets 
Atari on the corporate purchase order, 
it may assist in the ushering in of a 
new identity for the company. 

But Atari stumbled when it decided 
the Atari PC would be sold through 
mass-market channels. The company 
should follow the paradigm of firms 
like Apple, IBM, Zenith, Compaq, and 
others who know that computers sim- 
ply don't belong in the mass market 
where they are cheapened by the en- 
vironment and are considered inferi- 
or to computers sold in specialty 
stores. 

There exists the unfounded belief 
that the $680 Hyundai mass-market 
IBM PC compatible is selling like insect 
repellent in a nudist colony. "Like air 
conditioners in Alaska" is a more be- 
fitting analogy because as a recent Bus- 
iness Week article, "Hyundai Com- 
puters Are Stuck in the Slow Lane," 
reveals, the case is very different. 
While a slew of them made their way 
through the distribution channels to 
retailers, few made it off the shelves. 
The article refers expressly to mass 
marketing as the malefactor in the 
Hyundai PC's failure and notes that 
"Customers found computers stacked 
alongside microwave ovens with no 
trained sales help." An Advertising Age 
article described the situation similar- 
ly, noting that one large chain has al- 
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ready dropped the Blue Chip due to 
slow sales. 

The specialty store is the personal 
computer's most suitable habitat. 
There, personal selling can occur, and 
if an advertisement hasn't enlightened 
or persuaded a consumer enough, a 
knowledgeable salesperson can. 

XF401T19? 

Is the Atari ST destined to have only 
a cult following, or is it merely a sleep- 
ing beauty that has yet to awaken to 
the world? Many attribute the com- 
puter's relative anonymity to Atari's 
failure to get the word out through 
heavy promotion. But the un- 
precedented competitive climate of to- 
day's American marketplace makes ef- 
fective advertising a gargantuan feat, 
for the barrage of advertised messages 
comprises an indecipherable noise. If 
the message isn't potent enough, it 
only adds to the noise. 

So it is no longer enough to simply 
"go tell it on the mountain." Such con- 
ditions amplify the need to choose 
product names that are highly distinc- 
tive. Apple chooses names like Unidisk, 
LaserWriter, Macintosh, Imagewriter 
LQ, etc. Atari, on the other hand, 
selects names like XM301, SF314, 
SM804, XF551, SM1224. 1040ST, 
SF354, etc. This cryptic nomenclature 
makes effective camouflage, but is 
counterproductive to the cause of fight- 
ing product anonymity. It also goes 
against the grain of the intuitive user 
interface which was designed to make 
the computer more appealing to the 
"non-techie." "Computers for the mass- 
es, not the classes," Jack Tramiel al- 
ways says. 

Moreover, people are more inclined 
to discuss products whose names they 
can remember. Univac, Cray, Domain, 
VAX and Macintosh are names that 
have commanded attention in the com- 
puter industry. Even the name Amiga 
is more widely recognized than 520ST 
and 1040ST. The Amiga reportedly 
sells as well as the Atari STs, despite 
the vast difference in price. 

Megamania 

Judging by the use of the name Mega 
for the new Atari computers, the trend 
may be changing. But while the use of 
this metric prefix could mark the be- 
ginning of a much-welcomed new style, 
the name is a bit too tacky and toyish 
sounding for the serious machine it 
represents. Mega sounds more like a 



new Hasbro Transformer toy than a 
$2,000 to $3,000 computer. 

It's a shame that buyers often judge 
books by their covers, but with the 
plethora of computers on the market, 
realizing all distinctive features of all 
models is impossible. It has become far 
easier to judge a computer product by 
cursory examination of seemingly 
trivial aspects. Given this, the Mega ST 
with its tacky name may have begun 
life with an immediate handicap. 

Interestingly, with the announce- 
ment of the Mega series ten months 
premature of the delivery date, Atari 
felt the symptoms of Osborne syn- 
drome in the form of a drop in sales. 
Evidently, Atari didn't take a lesson 
from Adam Osborne's classic act of fol- 
ly. When Osborne Computer hastily an- 
nounced the Osborne 2 portable before 
the machine was ready, an acute drop 
in sales of the Osborne 1 sent the com- 
pany right into the depths of Chapter 
11 bankruptcy. 

Publicity— the most cost-effective 
form of advertising— was apparently 
sought when Atari released pictures of 
its new Mega machines to the press 
shortly after the computers were an- 
nounced. But unfortunately, the Mega 
was shown displaying a Neochrome 
picture of a cartoon-like robot, hardly 
reflecting the awesome power of a four- 
megabyte computer selling for $2,500. 

Apple's photos of its new one- 
megabyte Macintosh II computer 
showed the machine displaying a 
fabulous ray-tracing demo in which the 
Apple logo was reflected in several 
chrome balls. A very similar demo, Shi- 
ny Bubbles, existed for the ST com- 
puters long before the appearance of 
the Apple demo. In fact, the two are so 
similar that one would swear that the 
Apple programmer had modeled the 
Mac II demo after Atari's. Now, due to 
the Apple demo's wide exposure, the 
opposite might be assumed. 

Apollo also uses ray-tracing screens 
in ads to show off the power of its CAD 
workstations. Atari, on the other hand, 
rejected a ray-tracing demo of enor- 
mous potential in favor of a cartoon 
robot. In doing so, the company pro- 
cured but one thing: very poor public- 
ity. To appreciate the weight first im- 
pressions carry is to realize the detri- 
ment that may have been induced by 
Atari's photos. 

Still, the Mega is a refined machine 
with many welcome additions, includ- 



ing a detached keyboard. It was IBM 
that trained the consumer to believe 
that only a computer with a detached 
keyboard could bask in the esteem of 
a true business machine. The two-piece 
computer was thought superior to the 
one-piece computer, notwithstanding 
all technical differences. The one-piece 
configuration had forever become the 
mark of a home computer. 

Another factor contributing to com- 
puter product's image is visual impact. 
Ideally, a high-capacity hard-disk's 
visual appearance should cry out, 
"Power! Capacity!" But due to the color- 
ful, tacky lettering, the Atari SH204 
20-megabyte hard disk's visual appear- 
ance screams "Fisher-Price!" For- 
tunately, the new companion hard-disk 
to the Mega computer exhibits a 
marked improvement in visual impact. 

The evolving quill 

Sadly, Atari may never have such a 
unique opportunity as the one Apple 
had to unlock the door to the business 
world. Desktop publishing, which 
Apple merely stumbled upon, was the 
vehicle for getting a "foot in the door" 
of the corporate office. 

At first, despite the Macintosh's daz- 
zle, managers simply weren't given 
enough cause to switch from IBM. The 
IBM PC and compatibles could handle 
all the applications that the Mac could 
handle, and there was no reason to 
change, especially given that MS-DOS 
was the looming standard. Enter desk- 
top publishing. Finally, there existed a 
function uncommon to the IBM PC and 
all other MS-DOS machines. 

The Mac had become the only route 
to this new application. As a result, the 
corporate back door was pried ajar, and 
the Macs began scampering in. 

Today, desktop publishing can be 
perfomed quite easily on an IBM PC or 
clone, but the Macintosh remains the 
leader in desktop publishing, having 
established itself there first. 

A large portion of Apple's $2.4 billion 
in sales in fiscal 1987 came from the 
desktop publishing market, often dis- 
counted as a mere niche. Dataquest, a 
market research firm, believes that by 
1990 desktop publishing will be a $4.9 
billion industry. 

Atari, though a little late, is vying for 
a piece of the action by introducing its 
own desktop publishing system. With 
pricing being by far the most prevalent 
form of competition, Atari will sell its 
two-megabyte Mega ST computer and 
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laser printer package for a competitive 
$2999-about $2000 less than Apple 
gets for its laser printer alone. Because 
of Atari, the desktop publishing 
phenomenon may be felt more widely 
as it reaches those with tighter purse 
strings. 

But consumers mustn't be given the 
impression that Atari's desktop pub- 
lishing system is simply as good as Ap- 
ple's for less money. Greater incentive 
is required to lure buyers away from 
the leader. Advertising for Atari's pub- 
lishing system must be focused on fea- 
tures that are unique amidst other sys- 
tems' features. 

Better, weaknesses in the Macintosh 
should be exploited petulantly in 
Atari s advertising. Suitable ads should 
magnify the deficiencies of the Mac sys- 
tem that are corrected by the Atari 
desktop publishing system. (The ads 
could also employ a sly, but effective 
tactic by referring to the Macintosh as 
the Apple Macintosh, thus reopening 
the wounds Apple is healing disas- 
sociating Apple and Macintosh.) The 
most obvious and complained-about 
flaw of the Macintosh is its tiny screen. 
No trip back to the Atari drawing board 
is necessary because all ST models 
have screens that improve on the size 
of the Mac's. 

Ironically, the Macintosh's strongest 
feature— graphics— becomes a weak- 
ness when compared to the Mega ST. 
The screen resolution of the Macintosh 
is 512 x 342 pixels. When compared to 
the ST's monochrome resolution of 
640 x 400, the Mac's is shy of 128 x 58 
pixels. Voila!— another Macintosh vul- 
nerability is born. While Apple's ads 
tout the Mac's WYSIWYG (What You 
See Is What You Get, or the ability of 
the computer display to approximate 
the final printed document) ability, 
Atari's ads can justifiably claim that 
"the Mega computer is 'WYSIWYGier' 
than the Apple Macintosh." 

As color separation becomes of more 
concern to desktop publishers (and 
perhaps becomes amended to the defi- 
nition of WYSIWYG), the Mega ST will 
be ready with its built-in color capabil- 
ity and optional color monitor. Still 
another weakness is unearthed be- 
cause the Macintosh was not designed 
to handle color. 

In Macintosh weakness lies Mega 
strength. But the factors that constitute 
Macintosh vulnerability won't be in 
place very much longer. Ergo, oppor- 
tunity knocks. 



The difference is graphics 

As noted earlier, contemporary mar- 
keting says that changing the con- 
sumer's initial view of a company is 
nearly impossible. So direct attempts 
to make Atari mean "business com- 
puters" overnight would be fruitless. Is 
this predicament hopeless? 

Not entirely. What the consumer 
mind will acquiesce is something al- 
ready known: Atari means "computer 
graphics." This broader notion is fully 
compatible with the public's view of 
Atari as a video-game company, yet it 
establishes that Atari makes com- 
puters. If Atari's advertising were to 
repeat this accepted message over and 
over, graphics may eventually become 
the primary connotation of Atari's 
name. And while earning a reputation 
as a computer firm, Atari would also be 
differentiating itself from its 
competitors. 

Additionally, as computer applica- 
tions become increasingly focused on 
graphics— as are computer-aided de- 
sign and desktop publishing— Atari's 
name may actually be an asset. For the 
first time, Jack Tramiel's $240-million 
investment in the Atari name and sym- 
bol will have paid off nicely. "Atari: the 
difference is graphics." 

The prophet speaketh 

What does the future have in store 
for Atari, the 15-year-old enterprise 
that once employed Steven Jobs and 
Stephan Wozniak before the two found- 
ed Apple Computers? Newly elected se- 
nator Timothy Wirth of Colorado is la- 
beled a typical "Atari Democrat," a per- 
son, Time magazine reports, "who 
urges growth and investment in high- 
technology industries." 

Is the name used entirely with sar- 
casm here or is this a telling clue that 
Atari may be an icon for high technol- 
ogy? Does a peephole to Atari's future 
lie in the British post-punk band Sigue 
Sigue Sputnik's song "Atari Baby," 
about life in a future high-tech world? 
Or will time realize the prophecy of the 
movie Blade Runner? In this film set 
deep in the future, colossal city bill- 
boards everywhere displayed giant 
Atari ads as if the company had erupt- 
ed into a monstrous, domineering cor- 
porate empire. Could this scenario be 
an emblem of Atari's future? No. At 
least not unless Atari ceases to mean 
video game. 
More troubling still, back here in the 



days of Iran antics and Oliver North, 
Atari struggles against a deluge of op- 
posing factors: A home-computer hys- 
teria has abated following the video- 
game exodus; a business market is an 
intense battle of heavyweights like 
IBM, Apple and Compaq; a lucrative 
education market is dominated by the 
Apple-Tandy faction and may soon play 
host to IBM with its mighty resources, 
advertising capital and networking 
PS/2 model 25; a burgeoning desktop 
publishing market claimed largely by 
Apple is awash with IBM clone systems 
and will be further drained of its 
resources by IBM's upcoming PS/2 
desktop publishing system. 

So where does this leave Atari? For- 
tunately, the prospects are not entire- 
ly bleak for the company. Atari can be 
No. 1 in the MIDI market which it has 
entirely to itself. Many believe that to- 
day's computer game is won through 
software. With powerful, established 
software products like SBT Database 
Accounting Library, WordPerfect, 
dBMAN, Drafts: CAD, DAC Easy Ac- 
counting, Microsoft Write and Ready, 
Set, Go!, Atari has prolific fodder. This 
software must be exploited in Atari's 
ads, or its potential for selling STs will 
be wasted. 

Yet tomorrow's computer game may 
be won differently. It may be won in 
networking, multitasking, internal ex- 
pandability, connectivity, or brand- 
name partiality. And as the current 
competitive trend progresses, success 
will grow even more dependent upon 
marketing. If Atari is to outrun adver- 
sity and reach its outspoken goal of be- 
coming a $1 billion operation by 1990 
it better get busy, for it has a tremen- 
dous amount of work to do. The loss of 
Atari as a contender in the computer 
market would be tragic. Atari is the 
computer manufacturer with the most 
equitable cause of all: to give the buy- 
er, whoever he may be, the best value 
for his money, if 

Mike Donahue, a 20-year-old stu- 
dent living in Vermont, considers 
himself a "Vintage Atarian, " having 
been obsessed with Atari for nearly 
six years. Currently, he uses a 
monochrome 1040STand a Hewlett- 
Packard Laserjet Series II to run a 
small typesetter and graphic design 
firm. He welcomes reactions to the 
article and can be contacted through 
ST-Log Magazine. 
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A Look at 
Graphics in ST Gameware 

by Andy Eddy 

Computer games have come a long 
way since the early Pong days. This 
evolution, beginning with coin- 
operated arcade contests, has brought 
home computer playware to a level that 
still garners a major share of products 
sold. But looking over the period of 
time— a short lifespan, to say the 
least— that computer games have been 
around, it's obvious that people's tastes 
. lean towards impatience. 
. These days there are a ton of compa- 
nies creating gameware for personal 
computers; some have been around for 
a while, and others are simply spare- 
time endeavors sparking garage-based 
development of home-brewed products. 
To be successful, the bottom line is that 
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you have to keep moving ahead, bring- 
ing about new features to pique the end- 
users' attentions. Anything short of that 
will spell disaster to the company's 
long-term survival. 

But it's gotten to a stage where every- 
one who comes out with an entertain- 
ment product appears to have the 
phrase "3-D graphics" attached to it. 
We'll see how that may be something 
of a misstatement, as well as how de- 
velopments in entertainment software 
have brought us to the present era. 

In the Beginning .... 

While the layout of the game itself 
holds a lot of weight in a product's mar- 
ket success, you can boil most of them 
down into similar categories of struc- 
ture: shootouts (either space- or earth- 
bound), driving contests (sometimes 
mixed with the shooting genre), tradi- 
tional board games, adventures and 
sports. Predominately, what sets one 
piece of software apart from the next is 
how it's graphically represented. Even 
these can be broken down into 
categories, geometrically speaking. 

The first games to appear on the 
scene were what we'll call a two- 
dimensional playfield with one- 
dimensional movement; Pong and 
Space Invaders are examples of this 
basic layout. Simple left-right or up- 
down movement— limited to one axis, 
if you refer to the screen as an X-Y 
graph— is all that you can manage. 

The next generation brought us 
games like Asteroids and Missile 
Command. These went a step further 
by allowing two-dimensional movement 
in a two-dimensional playfield. Your on- 
screen counterpart isn't limited in its 
range of movement— both X and Y axes 
can be traveled freely. In fact, Asteroids 
takes it a jump beyond this with its 
"wraparound" universe. In other words, 
the borders of the screen were no 
longer like a wall to the player. This suc- 
ceeded in adding more tension and re- 
quired stronger peripheral vision from 
the player. 

Lastly, the final leap in programming 
is what we'll term three-dimensional 
movement in a three-dimensional play- 
field. Of course, it must be explained for 
clarity's sake that this three- 
dimensional universe— using the X, Y 



and Z (depth) axes at one— is sensory 
only. Though we'll mention the few 
deviations to the rule in a moment, the 
games we're talking about now are 
"simulated" in their 3-D effect, simply 
because a standard monitor screen is 
only two-dimensional. "2-D plus" or 
"2V2-D" are more accurate ways of term- 
ing these graphic representations. 

There are two different ways of creat- 
ing the perception of 3-D in a 2-D medi- 
um. Looking at a TV program shows the 
first way: The program was filmed on 
a 3-D stage, and the viewer relates to the 
perspective of objects on the screen and 
and how they interact with each other 
(i.e., size relationships and whether ob- 

It must be 
explained for 
clarity's sake 
that this 
three- 
dimensional 
universe is 
sensory only. 

jects move in front of or behind others). 

There are many good examples of the 
success of this method, but perhaps the 
easiest way to tie this in with computer 
gaming is Player/Missile Graphics. 
Through this, you can set players, mis- 
siles and playfields, as well as program 
how they interact with each other. In 
essence, this creates a situation similar 
to the TV show example above, giving 
the "illusion" of depth. 

Space Quest and others in the Sier- 
ra On-Line "3-D Animated Adventure" 
series demonstrate a similar use of this 
type of process to create the imagery on- 
screen. They're called 3-D adventures, 
but you're perceiving the effect because 
the onscreen characters can move in 
front and in back of, jump over and 
crawl under objects, as well as climb 



fences and trees, or fall into holes, just 
like television. 

The second method was first dis- 
played in Battlezone, that point-of- 
view (POV) display. You get the feeling 
that you're actually sitting in the vehi- 
cle (you don't, as in other games, see 
your character onscreen), and all ob- 
jects appear accurately scaled in size to 
the distance you are from them. Also, 
as you move around an object, your per- 
spective changes so you can see a differ- 
ent side of that object. 

This brought about a breakthrough of 
sorts. Previous contests depicted your 
character on the screen (as well as those 
characters around you), and you subse- 
quently controlled it in accordance with 
the threats you saw on the screen. POV 
games give you a whole different feed- 
back to react to, as you can't see all 
that's around you unless you manipu- 
late your character into a position that 
allows that view. 

To bring this up to date, games like 
Starglider (Firebird Licensees) and 
ST- Wars (Miles Computing) take the 
basic line-drawing structure of Battle- 
zone and give the user a strong dose of 
seemingly realistic motion and action. 
As an avid player of entertainment soft- 
ware, I know that the best test of a 
product's 3-D imagery is to note how 
you react to playing the game; in my 
case, I find that the docking silos of Star- 
glider have me ducking to avoid hitting 
my head on top. Sure, I know it's a 
game, but in the heat of battle I find my- 
self getting into it as if it were real life. 

On the Horizon 

Given the memory size/capability and 
processing speed of the ST— to be fur- 
ther enhanced by the blitter when it be- 
comes available— vector graphics can 
give way to solid construction of on- 
screen objects, as witnessed by ST- Wars 
and Harrier Strike Mission (also by 
Miles). This spells the future of com- 
puter gaming, as the last few years have 
brought us great leaps in graphic tech- 
nology. I'm sure that the next few years 
will be similar, especially if recent cre- 
ations dictate the path of progress along 
those lines. 

The strides that computer manufac- 
turers and software developers have 
taken to give us the latest and greatest 
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3D or Not 3D 

has resulted in some pretty wild con- 
coctions. For realism, old and new 3-D 
technology has been utilized in various 
manners to that end. 

In the old category, you can look back 
as far as the '40s and '50s to the in- 
troduction of two-color 3-D movies. 
While they fell out of favor, particular- 
ly when an increase in technology in 
this field brought about the advent of 
color 3-D movies (using polarized 
lenses), a resurgence of the two-color ef- 
fect came about recently as some of 
these ancient films were shown on TV 
stations across the country, giving view- 
ers at home what they previously had 
to travel to theaters to see. 

Bringing that up to date, Wanderer 
(Pyramide Software, marketed in the 
U.S. by Paradox) utilizes this two-color 
effect to bring about a realistic vector- 
graphic space shootout with depth. 
Again, the test of this was when I was 
demonstrating the game for a few 
friends. When one of the enemy ships 
dipped off the bottom of the screen, a 
couple of us tried to look "into" the 
monitor as if it were a window, think- 
ing that by moving our perspective, 
we'd be able to see the object below the 
field of vision that the screen provided. 
For those interested in experiencing 
this effect, there is a downloadable 
demo version of Wanderer in the "Ap- 
plications for the ST" section of the Ana- 
log SIG on Delphi. 

It's quite simple to build this effect: 
Two distinct images are put on the 
screen, one in red and the other in blue. 
Putting on a pair of glasses (with one red 
lens and one blue lens) gives each eye 
a different view by virtue of the lenses 
filtering out the image of their respec- 
tive color. If the two views are properly 
shifted and the color matching between 
the glasses and image is good, the brain 
assembles the incoming data where it 
is perceived as a realistic 3-D image. The 
limitations to this technique are suffi- 
cient, though. You're restricted on- 
screen to using only the two colors that 
are instrumental in forming the effect, 
and eyestrain can be fairly heavy with 
long gaming sessions. 
Now Tektronix, a strong, high-end 



graphics terminal producer, through 
their LC Technologies division, has 
brought a new twist to the creation of 
realistic 3-D or, more aptly described, 
stereo graphics. The StereoTek glass- 
es, as they are called, use high-speed 
liquid-crystal shutters (LCS) as lenses 
encased in plastic frames. The benefit 
to this is that similar to liquid crystal 
watches and video displays, when they 
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aren't activated, the lenses are basical- 
ly transparent, which is less annoying 
to your eyes. When they are under the 
ST's control with compatible software, 
the stereo effect can be amazing. 

Of course, this article is dealing with 
the proliferation of 3-D entertainment 
software, and the potential for that is 
great. At the time of this writing (mid- 
June), Antic already had a StereoTek- 
compatible version of Wanderer ready 
for release, as well as a Space In- 
vaders/Galaxians-type of contest called 
Shoot-The-Moon in nearly complet- 
ed form. 



On the third-party software front, 
Shelbourne Software (makers of ST 
Pool) were displaying a beta version of 
their upcoming 3-D Break thru at the 

Summer CES (Consumer Electronics 
Show). Slated for September release, 
this game is a variation of the original 
Breakout with one exception: Your 
paddle hits the ball "into" the monitor 
at a wall of bricks at the end of a hall- 
way. To open the product to as many 
people as possible, the game will have 
a function key toggle for switching be- 
tween normal and stereo play modes. 
The game is stunning in both modes— 
especially in stereo— and should be 
popular, laying the groundwork for 
Shelbourne's name becoming better 
known to Atari users. They also stated 
to me their intentions to support 
StereoTek users with future releases. 

Along with Shelbourne's efforts, Gary 
Yost, marketing director for The Cata- 
log, informed me that Rainbird Soft- 
ware was almost finished with a conver- 
sion of StarGlider to the glasses. Though 
I haven't yet seen a pre-release of the 
new version, Yost confirmed that it may 
lose a portion of its original innovative 
effects— like the memory-hogging, digi- 
tized music at the game's start— to allow 
the cramming of the stereo routines 
into a standard ST. 

In addition, the ever-present 
programming wizard, Tom Hudson, was 
one of the first to have his hands on this 
product outside the Tektronix staff. 
Among other things, he plans to con- 
vert his popular Livewire game (a 
Tempest-like contest for the 8-bit line 
originally published in ANALOG'S issue 
12), to the ST and have it playable with 
the StereoTek glasses. Other manufac- 
turers are looking into using this in- 
novative product with their future game 
development, depending on how the 
glasses sell. If the current sales indicate 
anything— Yost claims over 500 pairs 
were sold in the first month they were 
offered— more developers will be follow- 
ing suit. 

This technology takes gameware 
years into the future, all the while mak- 
ing it easier for programmers to utilize 
it in their efforts. And with the ST in 
the forefront of graphics creation, you 
can bet that we in the Atari communi- 
ty will be among the first to witness any 
other groundbreaking innovations.^ 
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jMouse-Ka-source 

Personalize your programs! 

Turns Mouse-Ka-Mania data files into source code for GFA 
Basic, C, or assembly program. 




by Charles F. Johnson 



One way to give your programs a dis- 
tinctive look is to use a custom- 
designed mouse cursor for some or all 
functions. Mouse-Ka-Source will 
take a mouse data file saved with my 
Mouse-Ka-Mania accessory (from 
ST-Log 18) and convert it into source 
'code that can be easily included into a 
GFA BASIC, C, or assembly language 
program. 

To use Mouse-Ka-Source, load 
GFA Basic, type in Listing 1, and save 
it to disk. Then simply run the pro- 
gram and follow the prompts it gives 
you. If you don't have GFA Basic, a 
compiled version of the program that 
can be run without the GFA interpreter 
is included on this month's disk edi- 
tion of ST-Log, or on the ST-Log ST SIG 
on Delphi. 

If you do program in GFA Basic, this 
program is especially easy to use; the 
file that it creates is a full subroutine 
that does all the work for you. Just 
merge it with your program and add 

the statement Gosub My mouse 

anytime you wish to change the mouse 
cursor to your custom shape. The 
subroutine written by Mouse-Ka- 
Source uses only local variables, so it 
shouldn't interfere with any part of the 
program you merge it with. 

The C conversion routine writes the 
mouse data as an integer array with the 
label MY_MOUSE (note the capital 
letters). There are several ways to 
change the mouse shape from C or as- 
sembly; so I didn't write a full sub- 
routine for these conversions. In C, the 
AES call to change the mouse might 
look like: 



gr_noret - graf_nouse 
C255,MY_M0USE); 

or, alternatively, the VDI call: 
vsc-fom (handle, HVJSOUfClJ 



When you convert a Mouse-ka- 

Mania data file to assembly source, it 
is written as a series of declare state- 
ments (dew). Asterisks are used to in- 
dicate comment lines, as per the Dev- 
loper's Kit AS68 assembler convention. 

I think you'll find that Mouse-Ka- 
Source is very easy to use. GEM alert 
boxes are used to select all the program 
options, and the GEM file selector is 
used to choose a mouse data file. The 
converted source code file will be writ- 
ten to the same directory the data file 
is in, and the source code filename will 
be the same as the data filename, with 
an extension of ".LST," ".H," or ".S" for 
Basic, C, or assembly source files. 

Mouse data files must have an exten- 
sion of ".DAT" to show up in Mouse- 
Ka-Source s default File Selector. If 
you've saved a data file under another 
name, you'll have to either type it in on 
the filename line, or edit the directory 
line to show files with a different 
extension. 

If the mouse data file isn't exactly 74 
bytes long (the size of a Mouse-Ka- 
Mania file) the program will display 
an alert box telling you, "This is not a 
Mouse-Ka-Mania data file!" A possible 
problem arises here, if you've down- 
loaded a data file using Xmodem, and 
it's been padded out to a multiple of 
128 bytes. If you somehow end up with 
a mouse file that isn't 74 bytes long, 
just load it into Mouse-Ka-Mania 
and re-save it— the length will now be 
correct. 

Charles F. Johnson is a profession- 
al musician, and now semi-professional 
computer programmer/reviewer/ 
author. He lives in Los Angeles with his 
wife Patty and Spike, the world's most 
intelligent (and gluttonous) cat. Charles 
is a sysop on the Analog Atari SIG on 
Delphi; his user name is CFJ. 
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■ Mouse-Ka-Source 

by Charles F. Johnson 

■ ———————————— = —— ———— 3— ——— — 

■ 

Wrong$="This is not a |Mouse-Ka-Mania I data file!" 
■ 

Rx=-(Xbios(4) <2) 

Deftext 1, 5, 8, 32-19*RX 

Text 238+12*RX, 32-16WRX, 26*RX, "ST" 

Deftext 1, 5, 8, 13-7*RX 

Text 278, 32-16*RX, 42, "-Log" 

Deftext 1, 8, 8, 6-2*RX 

Text 328, 32-16*R>t, "Presents : " 

Deftext 1,1,8, 32-19*RX 

Text 182+4*RX, 88-48*R>:, 272-16*RX, "Mouse-Ka-Sourc e ! " 
Deftext 1, 8, 8, 13-7*RX 

Text 236-4*RX, 18B-5B*RX, "by Charles F. Johnson" 

Text S 177, 128-64*RX, "Copyright 1987 Little Green Footballs Software" 

Alert 8," Written in GFA Basic I ", 1, " Go! | Exit ", X 

If X=2 

End 

Endif 
■ 

Dr i ve=Gendos (25) +65 
Ms_path$=Chr$ (Drive) +":\*. DAT" 

Finished=B 
While Not Finished 
Cls 

Deftext 1, 8, 8, 13-7«RX 

Text 176, 48-28*RX, "Choose a nouse data file to convert." 

Fileselect Ms_path$, B$, AS 

Cls 

If A$="" 

End 
Endif 

If Right$ (AS) ="V 

End 
Endif 

For lX=Len(A$) Downto 1 
If Hid$(A$, Ix,l)="V' Then 

Ms_pathS=Mid$(A$,l, I >!)+"*. DAT" 
IX=1 
Endif 
Next IX 
B$=A$ 

While Instr(B$,"V)<>8 

BX=Len (BS) -Instr (BS, "V'J 

B$=Right$(B$, Bx) 
Wend 

If Not Exist (AS) 
Alert 3,"Filenane not found! | ",1," Again | Abort X 
If X=2 
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End 
Endif 
Else 

Mn*=A* 

DatposX=Instr CMnS, " . DAT") 

If DatposX=8 

Alert 1, Wrong*, 1, " Oops! ", X 

Else 
■ 

Open "I",8l, AS 

If Lof(8l)<>74 

ftlert 1, Wrong$, 1, " Oops! X 

Close 81 
Else 



L , .. „ L ft ! ert 2 ' "Which type of file would|gou like to create?| ", 0, "Basic I C I flsse 
nbly", Choice 11 
■ 

On Choice Gosub Bas_f i le, C_f i le, Asn_f i le 



Alert^2, "Process another nouse?| ", 1, " Ves | No ", X 

End 
Endif 



Endif 

Endif 

Endif 

Mend 
■ 



The conversion subroutines 



Procedure Bas.fi le 

MnS=Lef tS CMnS, DatposX-1) +" . LST" 
Open "0",82,MnS 
Print 82, 

Print 82,"' Mouse Definition Subroutine" 
Print 82, 

Print 82, "Procedure My_nouse" 

Print 82, " Local IX, Ax,MnS" 

Print 82," Restore Mn_data" 

Print 82," MnS=";ChrS(34) ;ChrS(34) 

Print 82," For Ix=l to 37" 

Print 82," Read Ax" 

Print 82, " MnS=MnS+MKIS CAX) " 

Print 82," Hext IX" 

Print 82," Defnouse MnS" 

Print 82, "Return" 

Print 82, 

Print 82, "Mn-data:" 

Print 82,"' Hot spot X and V, Nunber of Planes, Mask and Cursor Colors" 
Print 82, "Data "J 
For IX=1 To 5 

Gosub X_string 

Print 82, "*";XxS; 

If IX<5 
Print 82,","; 

Endif 
Next IX 
Print 82 
HiS="Data " 
H2S="&" 

Print 82, "■ Mask data" 

Gosub D_write 

Print 82,"' Cursor data" 

Gosub D_write 

Close 81 

Close 82 

Return 
■ 

Procedure C-file 

MnS=Lef tS £MnS, DatposX-1) +" . H" 
Open "0", 82, MnS 

Print 82,"/* Mouse definition block */" 
Print 82 
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Print 82, "MV_MOUSE =" 
Print «2,"<")ChrSC9); 
For Ix=i To 5 

Gosub X-string 

Print «2, ,, 0x ,, ;Xx«;", "; 
Next IX 
Print 82 
Hl$=Chr$C9) 
H2S= M 8x" 

Print 82,"/* Mask data */" 
D_f lag=8 
Gosub D_write 

Print 82, "/* Cursor data */" 
D_f lag=-l 
Gosub D-write 
Print 82, ">;" 
Close 81 
Close 82 
Return 

Procedure Asn_file 

Mn$=Lef tS CMnS, DatposX-1) . S" 
Open "0",82,MnS 
Print «2, , '* M 

Print 82,"* Mouse definition block" 

Print 82,"*" 

Print 82, "ny_nouse:" 

Print 82, ChrS 19J ; "dc .u"; ChrS C9) i 

For IX=1 To 5 

Gosub X-string 

Print 82,"S";XxS; 

If IX<5 

Print 82,","; 

Endif 
Next IX 
Print 82 

Hi$=Chr$ 19) +"dc .w"+ChrS C9) 
H2S="S" 

Print 82,"* Mask data" 

Gosub D_write 

Print 82,"* Cursor data" 

Gosub D-write 

Close 81 

Close 82 

Return 
i 

Procedure D-write 
For IX=1 To 4 
Print 82, HIS; 
For JX=1 To 4 
Gosub X_string 
Print 82, H2$;Xx$; 
If H2«="8x" 
If Not D-flag 

Print 82,","; 
Else 

If IX<4 Or JX<4 
Print 82,","; 
Endif 
Endif 
Else 

If JX<4 

Print 82,","; 
Endif 
Endif 
Next JX 
Print 82 
Next IX 

Return 

i ■ 

Procedure X_string 

X$=Hex$ CInp (8l)*256+Inp (811 ) 
If LenIXS)<4 

XxS=Str ings C4-Len CX$) , "8") +XS 
Else 

XxSrXS 
Endif 
Return 
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TUTORIAL 



Step 1 - 

Hard Facts 
Pt. II 

A further look under the hood. 



by Maurice Molyneaux 



In the previous installment of Step 
1 , I set out to give you a brief guided 
tour of the interiors of an ST system, 
discussing what various chips con- 
trolled, and which other chips they 
worked with. This month, rather than 
discussing individual parts, we're going 
to discuss how the system works, and 
why it can and cannot do various 
things. 

Expansion 

When looking at any ST but a Mega 
you should be aware that it is— 
technically— what is known as a closed 
system. No provision is made for inter- 
nal expansion, i.e., adding hardware to 
expand the capabilities of your com- 
puter. This refers to internal expansion 
of the computer, not to adding 
peripheral devices to your ST (like 
modems, printers, digitizers, hard 
disks, etc.), which you obviously can do 
(if not, what are all those ports for?). 
Such closed architecture is the oppo- 
site side of the coin from open systems, 
which usually allow users to easily pop 
the top off of their computers and sim- 
ply plug in hardware devices to do var- 



ious things: add extra RAM, graphics 
enhancements, math coprocessors, etc. 
Open systems usually feature what are 
known as expansion slots. The slots are 
simply connectors into which the user 
can plug in an expansion board (or- 
card). Apple II series computers (except 
the lie) and most IBM PC compatibles 
are open systems. Computers like 
Atari's 520ST, 1040ST, 400, 1200XL 
and 65XE, Commodore's 64, 128, 16 
and + 4 (never heard of those last two, 
I'll bet), Texas Instrument's ill-fated 
TI-99, etc., are examples of closed 
architecture. 

We're going to take a detour here and 
cover a little Atari history. As history 
often repeats itself, it might be wise to 
observe past trends and see what might 
be if such trends continue. If you're 
familiar with Atari's 8-bit computers, 
you might have noticed that I didn't in- 
clude the 800, 600XL, 800XL and 
130XE in that list of closed computers. 
They are not exactly open systems, but 
they do have some facilities for expan- 
sion. For example, the Atari 800 has 
four slots inside it. These were original- 
ly intended only to allow users to plug 
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in simple RAM expansions that would 
increase your original 8K or 16K of 
RAM to 32K or even a whopping (for 
that time) 48K! A few companies and 
individuals have produced different 
kinds of boards to go in these slots, but 
as a rule they were underutilized. 

As to the 600XL and 800XL, these 
two machines are, in a sense, closed, 
except for a tiny pop-out panel on the 
back of the machines. Behind that 
panel is an edge-connector to the com- 
puter's motherboard called Parallel 
bus. This connector contains most of 
the important address and data lines 
of the computer and provides access to 
them so that users can potentially add 
on all kinds of devices. In fact, Atari 
even developed a device for this bus 
called the 1090XL, which was nothing 
more than a box that connected to the 
bus, and split it out into card slots- 
just like in an Apple II or IBM PC! The 
idea was to provide the ability to add 
RAM expansions, etc., in the box. Un- 
fortunately, the 1090XL was a long 
time in coming and eventually 
scrapped. Without it, the expansion 
bus on these computers was made 
almost worthless (though RAM car- 
tridges for the 600XL were produced to 
use this bus). 

When the 130XE showed up, Atari 
eliminated the parallel bus connector, 
and replaced it with an "Enhanced Car- 
tridge Interface" (ECI). They limited the 
address and data lines in this connec- 
tor, but put the connector directly next 
to the cartridge port, through which 
most of the rest of the lines could be 
accessed if developers needed to use 
them. 

Well, at last, a few developers began 
to take advantage of this expansion. 
Some hard disks for the 8-bits plug in 
through the ECI. Since the ECI connec- 
tor is not the same as the XL parallel 
bus, usually an adapter is used to make 
such devices work with both XL and 
130XE machines (the 65XE and XE 
Game System do not feature the ECI). 
Then, ICD produced its MIO device, 
which allows all kinds of expansion on 
the bus. It's what was needed when the 
XLs first came out. Better late than 
never. 

Now we return to the STs. Neither 
the 520 or 1040 models provide any 
sort of parallel or processor bus. Some 
types of expansion are easily carried 
out by plugging devices into the ST's 
DMA (Direct Memory Access) or Car- 
tridge (ROM) ports. To add RAM, for ex- 
ample, isn't as simple as plugging a 



card into a slot. Most methods require 
the user to solder wires or cables to the 
ST motherboard. The simplest expan- 
sions I've seen require the user to pull 
two chips out of their sockets (MMU 
and Shifter— see last issue), plug a RAM 
board's connectors into these sockets, 
and then plug the chips back into sock- 
ets on the expansion itself. 

Expandability is nice, although not 
everyone needs it. The Mega ST units 
address this need— sort of. Atari hasn't 
given us an open system, but it has 
given us an internal DMA port and— a 

Just because 
Atari gave us 
a processor 
bus in the 
Megas 

doesn't mean 
we'll 

instantly be 
able to add 
an expansion 
box and slam 
cards into it. 

processor bus. Hmmm. It seems you 
can add one board inside a Mega by 
plugging into a connector which pro- 
vides the full 68000 bus. It's not quite 
card slots; although, theoretically, an 
enterprising company could hook into 
the bus and add an expansion chassis 
outside the ST. 

Sound good? Maybe. Remember the 
XL parallel bus, 1090XL box, or the 
800's internal slots? The connectors 
were there on those 8-bits, but they 
never got the kind of use they should 
have. Just because Atari gave us a 
processor bus in the Megas doesn't 
mean we'll instantly be able to add an 



expansion box and slam cards into it. 
It's possible that will happen, perhaps 
more likely than on the 8-bits, but it 
hasn't yet, so don't bet your bottom dol- 
lar on it. Don't run out and buy a Mega 
because of its "promise," because a lot 
of times such promises are not met. 

(One quick note: At the Northeast 
Atari Computer Fair in October, Supra 
Corp. was showing an internal 
20-megabyte hard disk [hard card] for 
the Mega STs. Please note that this 
device does not plug into the processor 
bus, but rather ties into the Megas' 
aforementioned internal DMA port.) 

The All-ln-One Micro 

One thing many users fail to under- 
stand is just why various microcom- 
puters are incompatible. Why can't you 
plug a C-64 disk drive into an Apple II? 
Run IBM software on an ST? There are 
myriad reasons for this, but the most 
common cause is that the hardware it- 
self is completely different. 

Let's take a disk drive problem as an 
example. Let's say you have 130XE 
with an Atari 1050 floppy disk drive. 
You also have a 520ST with its SF354 
microfloppy disk drive. You want to 
port some data files from the XE to the 
ST. It would be nice if you could just 
plug the disk drive from one into the 
other and read the data. Not so easy. If, 
for example, you wanted to move some 
files from an ST disk to an XE disk, you 
might think to hook the SF354 drive 
to your XE. Doesn't sound difficult, 
right? Get a cable and away you go. 

Wrong. Even if you could get a 
proper cable made, it still wouldn't 
work. The Atari 8-bit floppy disk drives 
are "intelligent," meaning they have 
their own ROM and disk controller sys- 
tems built in. ST microfloppy drives 
are "dumb," and are controlled by the 
WD1772 disk controller inside the ST. 
The 8-bit doesn't have a disk controller 
itself, so, if the drive doesn't have its 
own "brains," the 8-bit can't control it. 

Further, even if by some miracle you 
could give the 8-bit a disk controller (in 
software, for example), the computer's 
SIO (serial input/output) port doesn't 
transfer data at the same rates as the 
ST's microfloppy interface! In fact, to 
use an SF354 on an 8-bit would require 
you to build an interface board— no 
easy feat! 

The only other way would be to buy 
an 8-bit drive containing a controller 
board that works with disk mechan- 
isms using standard interfaces (such as 
the XF551), use the controller board 
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and swap the drive mechanism out of 
your ST drive. (In fact, this is being 
done by some dealers and hackers. 
They exchange the 5.25-inch drive 
mechanism in an XF551 with a stan- 
dard 3.5-inch double-sided mechanism. 
Apparently this works with most kinds 
of 8-bit DOS, although to use both sides 
of the disk you'll need a DOS which 
supports double-sided drives— like 
Sparta-DOS.) 

The cost and effort of building your 
own interface would make it prohibi- 
tive; and you'd have no better luck try- 
ing to interface an Atari 810 or 1050 
drive to your ST. (And, if you did some- 
how manage to build the interface, 
you'd need a program to tell each com- 
puter just how to access the disk drive, 
and how to read the other computer's 
files!) 

Such problems can occur with many 
types of hardware. Hard disk drives 
used with the ST must have a proper 
controller and interface. Most hard 
drives sold specifically for the ST have 
these built in, but if you want to add 
a "generic" hard drive, you'll have to 
obtain the proper controllers (these can 
be purchased if you know where to 
look). 

This applies to running software too. 
Sometimes I think 111 scream 
whenever I hear people complain that 
"Atari should have made the ST com- 
patible with the Amiga/IBM/Atari 
8-bits/AppleII/Fred's Computer/etc." 
Still, it's a valid question. Why didn Y 
Atari make the ST compatible with 
other computers? 

To begin with, various computers use 
different parts. The microprocessor in 
the ST, Amiga and Macintosh is the 
16-bit MC68000; in the Atari 8-bits, C-64 
and Apple II family (but not the IIGS), 
it's the 8-bit 6502 (or a variation of it). 
IBM PC compatibles have Intel 8088, 
8086 processors, and their more ad- 
vanced models use 80286 and 80386 
chips. Most CP/M machines used the 
8-bit Zilog Z80. Each kind of 
microprocessor is different. They have 
different addressing modes, instruc- 
tion sets, number of data and address 
bits, types of registers, etc. Also,chips 
work in "families." A 68000 is designed 
to work with a 68901 MFP, and the 
8088 can use an 8087 math coproces- 
sor. I suppose you could make an 8088 
work with a 68901 MFP, but again, it's 
probably not worth the trouble. 



In order to make the ST compatible 
with the IBM PC, Atari would have had 
to include an 8088 (or derivative of it) 
and its support chips inside the ST. 
They would have had to add a 6502 and 
support chips to make it Atari 8-bit 
compatible. This would not only have 
made the design of the computer more 
complex, but would have substantial- 
ly raised its cost. 

To complicate matters, just sticking 
the proper microprocessor and its sup- 
port chips into the ST wouldn't do the 
job. For example, Atari 8-bits have a lot 
of custom chips inside them. Custom 
chips (also mentioned last time) are In- 
tegrated Circuits (ICs) designed and 
built for a specific computer. To make 
the ST fully compatible with an Atari 
8-bit, we'd need not only the 6502, but 
the Atari 8-bit chips ANTIC, GTIA, 
POKEY, FREDDY, and the 8-bit ROMs. 
To use the 8-bit's peripheral hardware, 
we'd need to add the proper cartridge 
port, as well as an SIO port. 

Atari could do this— since those are 
Atari chips. But for the ST to be Amiga 
compatible, Atari would need to add 
the custom chips from that computer 
(which they do not have legal rights to 
use), or build their own "clone" parts 
to do the same job. Imagine trying to 
make a chip which does the same job 
as the Amiga's Bimmer (blitter) chip, 
that is compatible with Amiga software, 
works just like in the Amiga, but 
doesn't infringe on the copyrights on 
that chip! It's next to impossible! 

Even if they managed to overcome 
that hurdle, there's still the question of 
the computer's Operating System (OS). 
Commodore isn't going to let Atari use 
Intuition OS and AmigaDos, no more 
than Apple will license Atari to use the 
Mac's Finder, or the Apple IPs Ap- 
plesoft BASIC. 

Some computers can be emulated 
rather easily, although dealing with for- 
mats and file compatibility can still be 
a problem. IBM PCs are simple to clone 
because IBM used "off the shelf parts 
for its PCs, which anyone can buy and 
use, regardles of whether IBM likes it 
or not. Their PC-DOS OS is not in ROM, 
but on disk. It was designed by 
Microsoft and can itself be purchased 
under the name MS-DOS. A Mac emu- 
lator is more difficult. The Macintosh's 
OS is in ROM, and Apple vigorously at- 
tacks anyone who produces anything 
that even resembles what their ROMs 
do. The Magic Sac Mac emulator for 
the ST gets around this problem by 
providing no ROMs. You have to some- 



how obtain the actual Mac ROMs (either 
from a Mac or an agreeable Apple deal- 
er). Then you also have to get a copy of 
the (copyrighted) Mac Finder software. 
To make the ST Mac-compatible, Atari 
would have had to do the same. They 
couldn't very well have advertised the 
ST as Mac-compatible and then re- 
quired the user to get the Mac Finder 
and ROMs on his own and install them! 

Oh, it can be done, one way or 
another. But generally speaking, it 
jacks the price of the machine up. 
Atari's marketing strategy has been 
"Power Without Price." To make an ST 
which is also Mac/Amiga/IBM/etc. com- 
patible would make it too pricey. 

I'm forgetting software emulation, 
like the ST X-former, the CP/M 
emulator or PC Ditto. They more or 
less work, but they're never as good as 
a hardware solution because they have 
to make the computer pretend it's 
something it isn't. Since the com- 
mands for an 8088 processor are differ- 
ent than those for a 68000, for the ST 
to be able to run MS-DOS (IBM) soft- 
ware, the emulator must translate the 
8088 instructions into a form under- 
standable by the 68000. Then the 
68000 must do itsjob and translate its 
data back to a form understood by the 
program being run. This is usually 
slow. Most software emulators run be- 
tween 30% and 70% as fast as the real 
thing. But, I hasten to add, they do run. 
They may not be 100% compatible 
with, or as fast as the real thing, but if 
the program you need to run works 
with a software emulator, then it's 
probably worth having (and it's usual- 
ly much cheaper to obtain a software 
emulator than a hardware one.) 

Mission: POSSIBLE 

I suppose now that I've listed all 
these things your ST can't do, I should 
balance the bad news with good by dis- 
cussing some things it can. Let's start 
by looking at expandability. True, the 
ST doesn't have card slots, and there 
isn't (as I write this) anything that uses 
the Mega's processor bus, but you can 
add some kinds of hardware to your 
ST. 

The most common hardware up- 
grade is the RAM expansion. Most often 
these are performed on 520STs to give 
them the same total RAM as a 1040ST: 
1 megabyte (1024K). There are also up- 
grades for 1040STs, as well as boards 
which will push either ST into the 2- 
to 4-megabyte range. Most of these 
large expansions feature a board to 
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which the user must add RAM chips, 
usually of the (somewhat expensive) 
1-megabit variety. The chips for such 
large upgrades must usually be pur- 
chased separately of the board. 

Most common RAM expansions are 
of a set RAM size and all necessary 
chips are provided. The boards usual- 
ly work by hooking into the address 
lines of the MMU and Shifter chips. A 
few (as mentioned earlier) can be 
plugged in, but most require soldering 
jumper wires, cables, or for you to 
move or replace some components. 
Some might even require you to "pig- 
gyback" components (placing one chip 
on top of another and soldering the top 
one's legs to those below), which is deli- 
cate and sometime dangerous work. 

A far less common upgrade (now) is 
to put TOS in ROM. If you purchased 
a 520ST prior to January 1986, it prob- 
ably didn't have TOS in ROM (in such 
a case you need a TOS system disk to 
boot the machine). Using a disk-based 
TOS takes away about 200K of RAM 
from your use. If you have an older 
520ST and still must boot TOS from a 
disk, you should get the ROM TOS— 
now! Installing it is a simple operation, 
merely requiring the technician to re- 
move the two 16K boot ROMs and in- 
sert the TOS chips into the waiting 
sockets. The only loss is the colorful 
boot screen (I always liked those color- 
cycling Fuji logos), which the gains far 
outweigh. 

A battery backup clock is another 
common upgrade. When flies are saved 
the current time/date settings are 
stamped on the file. The time/date is set 
from the Control Panel accessory, 
which you may not always have 
present on the Desktop. It's also easy 
to forget to set the clock when you boot 
up. A clock upgrade adds a battery 
backup unit to your ST (the board, be- 
cause of the battery, holds the correct 
time even when the computer has been 
turned off). When the computer is boot- 
ed, the current time/date from the 
clock are fed to the system's own real- 
time clock, insuring the correct date 
and time are always set. 

Such upgrades come in a number of 
forms. Some are cartridges, plugging in 
externally (some of these extend the 
cartridge port, permitting you to plug 
another cartridge in even with the 
(dock in the cartridge port— though I've 
heard of problems with this method). 
Others are small units which are inter- 
faced into the IKBD chip socket on the 
bottom of the keyboard, or plug into 



one of the ROM chip sockets. The in- 
ternal kind tend to be better because 
you don't always end up having a car- 
tridge hanging out of the side of your 
ST. The Mega STs have a battery 
backed-up clock as part of their stan- 
dard equipment. 

When most people think of cartridge 
ports, they generally think of video 
games. Such ports can be used for all 
kinds of input, not just plugging in 
PacMan That the ST has a cartridge 
port is nice, and something that should 

As history 
often repeats 
itself, it 
might be 
wise to 
observe past 
trends and 
see what 
might be if 
such trends 
continue. 

not be overlooked. Without it, imagine 
how difficult it would be to implement 
something like the Magic Sac! The car- 
tridge port allows such devices to be 
plugged right in. 

Sure, it's not the same as having six 
or eight card slots, but it's something 
Atari could easily have left out. With it, 
I can plug in a digitizer, a cartridge con- 
taining numerous desk accessories, the 
Magic Sac, StereoTek 3-D glasses, or 
even a system diagnostic unit (used by 
Atari service centers to check 
machines for defects), without having 
to unplug other devices (my printer, 
modem, hard disk, etc.). 

My only advice: Don 't touch the car- 
tridge port! If at all possible avoid any 
contact with it, particularly when the 



machine is on. The port exposes many 
critical address lines on the mother- 
board, and you don't want to risk build- 
ing up static electricity, or causing a 
short, in such a delicate area. 

Cioo! 

That's Italian for farewell (and, no, 
it's not spelled chow), but only with 
people you really know, otherwise it's 
arrividerci. And, since we've become 
familiar over the past months, I'll close 
with it. Tune in next time when we'll 
be getting away from hardware- related 
topics (at last). 

Addenda 

Again, more comments and correc- 
tions on previous Step 1 S. 
—In Processed Prose (issue #17), 

I was discussing ST Writer version 
1.70 and 1 st Word version 1.06. 1 for- 
got to mention that while versions of 
1st Word were freely distributed with 
some ST systems, that bundling was 
discontinued some time ago. 1st Word 
can be purchased from Atari Corp., but 
it is no longer a "freebie." I do not 
know what version number the latest 
for-sale version is. 

As to ST Writer, since I wrote 
Processed Prose, a significant up- 
grade has taken place. As I write this, 
ST Writer version 2.3 is now available 
(public domain). This version works 
just like 1.70 and 1.80, but adds some 
GEM goodies. You can activate the 
mouse and use a special GEM menu bar 
in place of the usual command menu 
screen, or even move your cursor or 
scroll pages using the mouse. However, 
the mouse can easily be disabled, allow- 
ing the program to remain much 
quicker and nimbler than 1st Word. 
Contact your local users group or 
peruse some BBS systems if you wish 
to obtain the latest ST Writer upgrades. 
They can also be found in ANALOG'S 
Atari SIG on Delphi. // 



Allergic to all things Commodore, 
Maurice Molyneaux is an author and 
artist who— when not writing articles 
for ST-Log— continues to struggle with 
a recalcitrant 8-year-old science fiction 
novel, paints, illustrates, and uses his 
ST for "every conceivable task." 
Despite a ridiculously French name, he 
claims to having been born in Vicen- 
za, Italy, and denies vicious rumors 
that he eats escargots and calamari 
when computing. His DELPHI user- 
name is MAUIUCEM. 
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by Kevin Kennedy 

Low Resolution 



Some time in the future, thousands of 
asteroids were detected floating toward 
Earth. Fortunately because they were 
found soon enough, hundreds of robot 
ships were sent to destroy them. These 
ships were controlled by people on 
Earth. Though they had only a few con- 
trols, including rotate, thrust and fire, 
they were able to destroy most of the 
asteroids, but there were still some 
heading for Earth. They had anticipat- 
ed this problem and built a sophisticat- 
ed and expensive defence system. To our 
surprise, the guidance module was 
never installed. Once again, people were 
called to help save Earth. 

The method of operation for these sys- 
tems was completely different. The 
Earth was divided into ranges. The 
length of the ranges depended on the 
expected amount of asteroids. The range 
would be smaller if more asteroids were 
expected in that area and larger if there 
were only a few asteroids expected. The 
ranges were measured in miles. Because 
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computers were supposed to be han- 
dling this system, some ranges were 
specified in fractions of miles. For exam- 
ple, in an area where many asteriods 
would fall the range would be small, like 
.25 miles. Missiles were used to blow 
these asteroids out of the sky, and were 
launched by specifying their location in 
the range. For example, if a missile were 
to be launched in the middle of a one 
mile range, the value .5 would be en- 
tered into the computer. 

In Decimal Destroyer, you have been 
called to be one of the defenders of 
Earth. Before the game starts, you will 
be asked what level you want to start on. 
Levels go up to seven, one being the eas- 
iest. When the game starts, you must 
enter a number between the ranges. The 
range extends from the number on the 
left of the window, always zero, to the 
number on the right. You can enter any 
number between 0.000 to 9.999, not go- 
ing past the thousandth place. You will 
be told if your number is out of the 



ranges. 

During the game, asteroids are 
descending and must be hit before they 
reach the ground. You can miss an 
asteroid three times before you will be 
told what number you should have 
entered. 

When you destroy either two or four 
asteroids, depending on what level you 
are on, you advance a level. You are al- 
lowed five misses per game. A miss oc- 
curs when an asteroid hits the ground. 
The game ends when you either run out 
of misses or you complete level seven. 
You will then be rated from excellent to 
try again. 

The Program 

Decimal Destroyer is written in Per- 
sonal Pascal by OSS and CCD. It uses 
GEM calls so it needs all the Pascal GEM 
support files and must be compiled with 
GEM selected. 

Decimal Destroyer uses XBIOS calls 
for sound, random number generation, 



and to shake the screen up and down. 
The shaking effect is done by quickly 
adding and subtracting 1280 to the 
physical screen base. 

Because pascal does not have any 
raster copy functions, I used an old ani- 
mation technique. Rather than drawing, 
than erasing the entire object, only the 
parts of the object that need to be drawn 
or erased are handled. For example, on 
the rocket only the nose and the tips of 
the fins are drawn and only the bottom 
part is erased. When the rocket ascends 
it appears to be a solid object. The 
problem with this method is that ob- 
jects can travel only in one direction 
and only one step at a time. 

One of Mr. Kevin Kennedy's 

projects in a Colorado State Science 
Fair, Computers for the Impaired, 
won an award from the IEEE (Insti- 
tute of Electrical and Electronic 
Engineers). 
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PROGRAM Decinal-Destroyer; 

{ XXXXXKXXXXXXXXXXXXMXXXXXXXXXXXXKXXXXXX 

***« DECIMAL DESTROYER «w» 

**** Written by Kevin Kennedy **** 

mkxw using xxxx 

**w* Personal Pascal **** 

X X K X |j y MMKM 

M MM *J ft O UMUU 

« ji U ■ O ■ O • H H « H 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx } 



COHST 
C$1 GEMCONST.PAS> 

TVPE 

converted = STRING [51; 
ISl GEMTVPE . PAS> 

UAR 

level, nl, dia : INTEGER; 
range : REAL; 

{$1 GEMSUBS.PASJ 

{»*** O.S. FUNCTION CALLS **»»} 

FUNCTION physbase i LONG-INTEGER; 
XBI0SC2); 

PROCEDURE setscreen(a,b : LONG-INTEGER } c : INTEGER); 
XBI0SC5) ; 

FUNCTION sound-chip (data, register : INTEGER) : INTEGER; 
XBI0SC28); 

FUNCTION randon : LONG-INTEGER; 
XBI0SC17); 

{»*** SOUND PROCEDURE »} 

PROCEDURE soundCtone : LONG-INTEGER ; vol une, register, noise: INTEGER); 
UAR 

dunny, nsb, lsb, enable, toneh, tonel, sel, ensve : INTEGER; 
BEGIN 

ensve l= sound-chip (ensve, 7) ; 
toneh := INTttone DIU 256); 
tonel := INTttone MOD 256); 
lsb 1= ensve & 64; 
nsb i= ensve & 128; 
CASE register OF 

6 : sel := 62 ; 

3 : sel i= 55 ; 
END; 

enable != lsb+nsb+sel; 
dunny '•- sound-chip (enable, 7+128) ; 
dunny := sound-chip (volune, 8+128) ; 
IF registers THEN 
BEGIN 

dunny Is sound-chip (tonel, 8+register+128) ; 
dunny 1= sound-chip (toneh, l+register+128) ; 
END 
ELSE 

dunny Is sound-chip (noise, 6+128) ; 
END; 

{w*«* MISC. FUNCTIONS & PROCEDURES *m*k} 
PROCEDURE convCinl : REAL ; UAR out : converted) ; 
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UAR 

cnv : INTEGER; 
BEGIN 

FOR cnv := 1 TO 4 DO 
BEGIN 

out [cnv] : = Chr CTrunc tinlJ +48) ; 
inl := (inl-Trunc CinD) » 10; 
END; 
END; 

FUNCTION establish_dif f icultyClewel : INTEGER) : INTEGER; 
UAR 

tenp : INTEGER; 
BEGIN 
CASE 
level OF 
1: range Is 1; 

2, 3:range la CINTCrandon & 3) + 1) * 8.5; 

4, 5:range la CINTCrandon & 7) + 1) * 6.25; 

6, 7: range la CINTCrandon & 1023) + 560) * 8.601; 
END; 
CASE 
level OF 

2,4,6 i establish_dif f iculty la 2; 
1,3,5,7 : establish-difficulty := 4; 
END; 
END; 

PROCEDURE show-tally Cnunber, hits : INTEGER); 
UAR 

dialogi, dialog2, dialog3 : STRING; 
dialog4 : STR255; 
p : REAL; 
x : INTEGER; 

BEGIN 

dialogi la '[lit GAME 0UER|0ut of __ you destroyed __.|'; 

p la hits / nunber * IBS; 

dialog2 la 1 TRV AGAIN'; 

IF p > 89 THEN dialog2 la ' EXCELLENT'; 

IF Cp > 79) AND Cp < 98) THEN dialog2 la ' UERV GOOD'; 

IF Cp > 59) AND Cp < 88) THEN dialog2 la 1 FINE'; 

IF Cp > 48) AND Cp < 68) THEN dialog2 la ' SO-SO'; 

x i= nunber DIU 18; 

dialogi [291 la CHRCnunber DIU 18 + 48); 
dialogl[381 la CHRCnunber MOD 18 + 48); 
dialoglE46] la CHRChits DIU 18 + 48); 
dialoglC47] is CHRChits MOD 18 + 48); 
dialog3 la '][ OK 1'J 

dialog4 la CONCAT Cdialogl, dialog2, dialog3) ; 
dia Is Do_AlertCdialog4, 1); 

end; 

{**** ANIMATION PROCEDURES «h«} 

PROCEDURE clip; 
BEGIN 

Set_ClipC68, 1,289, 148); 

end; 

PROCEDURE unclip; 
BEGIN 

Set_ClipC0,8,639,288); 
END; 

PROCEDURE draw_rocket Cx, y : INTEGER) ; 
BEGIN 
clip; 

Line_Co lorC 2); 
LineCx+2, y+2, x+4, y) ; 
Line-To Cx+6, y+2) ; 
Line Cx, y+11, x+1, y+18) ; 
Line Cx+7, y+18, x+8, y+11) ; 
Line-Color C8) ; 
Line Cx, y+16, x+2, y+14) ; 
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Line-To (x+6,y+14); 
Line_To(x+8,y+16); 
unci ip; 

end; 



PROCEDURE draw-asteroid (x, y : INTEGER); 
BEGIN 
clip; 

Line-Color (6); 
Linetx, y+18, x+2, y+12) ; 
Line_To(x+3,y+il); 
Line-To (x+5, y+13); 
Line-To (x+7, y+11) ; 
Line-To (x+8, y+12); 
Line_To(x+18, y+18); 
PlotCx, y+4) ; 
Plot(x, y+7); 
Plot(x+il, y+8) ; 
Line-Color (8) ; 
Plot(x, y+9) ; 
PlotCx, y+5); 
Line(x, y+3, x+1, y+2); 
Line-To Cx+2, y+2) ; 
Line-To (x+4, y) ; 
Line-To Cx+6, y+2); 
Line-To (x+7, y+2); 
Line-To tx+8, y+1) ; 
Line-To (x+9, y+1) ; 
Line-To Cx+11, y+3) ; 
unclip; 

end; 

{»*** Graphics procedures ***»} 

PROCEDURE colors; 
BEGIN 

Set-Color C8, 8, 8, 1888); 
Set-ColorCl,8,8,8); 
Set-Color (2, 1888, 8, 8); 
Set-Color C3, 1888, 8, 8) ; 
Set-Color C6, 8, 1888, 1888) 

end; 

PROCEDURE draw-screen; 
UAR 

out, r : converted; 
cpy : INTEGER; 
BEGIN 
unclip; 
colors; 
Clear-Screen; 
Line-Color (1); 
Paint-Color (3) ; 

Frane_Round_Rect C49, 8, 238, 158) ; 
Line (84,148, 64, 148); 
Line (164,145, 164, 148); 
Line (264, 148, 264, 148); 
Text-Color (2) ; 

Draw-String (168, 168, 'Misses Left ! "1 J 
r • ~ * * J 

r := Chr(nl+48); 
Draw.String (272, 168, r) ; 
Draw_String(48,148, '8'); 
r := "; 
conv (range, r) ; 
Draw-String (348, 148, r) ; 

out := '_. '; 

out (11 i= rill; 

FOR cpy := 2 TO 4 DO 

outEcpy+1) := rtcpyl; 
Draw-Str ing (279, 148, out) ; 
Draw-String (38, 168, ' Level s 'I J 
Draw-Str ing (78, 168, CHR(level+48)) ; 
END; 

PROCEDURE rumble; 
UAR 
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Hoop : INTEGER; 
pb : LONG-INTEGER; 
BEGIN 
pb is physbase; 

for Hoop := i to ieee do 

BEGIN 
IF OddClloop) 

THEN setscreen C-l, pb-1288, -1) 
ELSE setscreen f-JL, pb, -1) ; 
sound (8, 15-1 loop DIU 57, 3, Hoop] ; 
END; 

sound CO, 6, 3, 0) i 
setscreen (-1, pb, -1) ; 
END; 



FUNCTION inputtrng : REAL) : REAL ; 
LABEL 2,3; 
MAR 

gb : DIALOG-PTR; 
lnl, ln2, dul, conv, te : INTEGER; 
txl : STR255; 
input2 : REAL; 
BEGIN 

gb := Neu_DialogC3,2,21,35,4); 

lnl := Add_DIten(gb,G_Text, 0,8, 1,33,1, 8,4811; 

Set-DText(gb, lnl, 'Enter a nunber within the ranges 1 , 3, TE_Center) ; 
ln2 := Add_DItenCgb,G_FText,15,14, 2, 5,1, 0,481); 

Set-DEdit (gb, ln2, ' ' , ' 9999 ' , 1 ■ , 3, TE_Center) ; 

2 : dul := Do_Dialog Cgb, ln2) ; 
Get_DEdit(gb, ln2, txl) ; 



FOR conv := 1 TO 4 DO 
BEGIN 

te := 0rd(txlEconv])-48; 

IF tte<0) OR (te>9) THEN txllconv] := '0'; 
END; 
input2 := 0; 

input2 := COrd Ctxl [1] ) -48) + C COrd Ctxl [21 ) -48)* 8.1)+CC0rdCtxi[31)-48)* 8. 81)+ 

CC0rdCtxlC4])-48)* 8.081); 
input := input2; 

IF Cinput2 >-8.999) AND Cinput2 < rng+8.881) THEN GOTO 3; 
dia := Do-AlertC 1 til [ Nunber is|out of range]! OK ]',1); 
GOTO 2; 

3 : End_Dialog(gb) ;Delete_Dialog(gb) ; 
Paint-Color (8) ; 
Paint-Rect CB, 1G5, 319, 35) ; 
END; 

PROCEDURE explodeCxpos,ypos : INTEGER); 
UAR 

radius, r, g, b : INTEGER; 
PROCEDURE oval; 
BEGIN 

r := IntCrandon ft 1088); 

g := IntCrandon ft 1888); 

b := IntCrandon ft 1800); 

Frane_Oval Cxpos, ypos, radius, radius) ; 

Set-Color CI, r, g, b) ; 

sound CO, 18, 3, IntCrandon ft 3D); 
END; 
BEGIN 
clip; 

Line-Color CI); 

FOR radius := 0 TO 38 DO 

BEGIN 
oval; 

END; 
Line-Color CO) ; 

FOR radius IS 30 DOUNTO 0 DO 
BEGIN 
oval; 
END; 

sound CO, 0, 3, 0) ; 
unclip; 
draw_screen; 
end; 
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PROCEDURE nove_asteroid(xpos, ypos, ydest : INTEGER); 
UftR 

ay : INTEGER; 
BEGIN 

FOR ay != ypos TO ydest DO 
BEGIN 

draw_asteroid(xpos, ay) ; 
sound (ay, 18, 0, 0) ; 
END; 

sound (8, 8, 8, 8) ; 

end; 

PROCEDURE launch (xpos, ydest : INTEGER); 
UAR 

ay : INTEGER; 
BEGIN 

FOR ay != 168 DOMNTO ydest DO 
BEGIN 

draw_rocket (xpos, ay) ; 
sound (8, 18, 3, ay DIU 5*0rd (ay>8) ) ; 
END; 

sound (8, 8, 3, 8) ; 

end; 

{ XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXMXXXXXXXMXXXXXXXXXXXXXXXXXXXXX } 

{ xxxxxxxxxxxxxxxxxxxxxxx riain gane xxxxxxxxxxxxxxxxxxxxxxxxxxx } 
C xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx } 

PROCEDURE do-gane (active : INTEGER ; UAR h : INTEGER); 
UAR 

asteroid-ary : ARRAV U.. 4,1.. 31 OF INTEGER; 
drop, gne, shoot, ax, hit : INTEGER; 
nun : REAL; 

PROCEDURE setpars(asteroid : INTEGER); 
BEGIN 

asteroid_ary (asteroid, 11 is 1; 

asteroid-ary [asteroid, 21 := Round (Int (randon & 255) * 8.784) +61, 
asteroid-ary [asteroid, 31 := -18; 
end; 

PROCEDURE snash(asteroid i INTEGER); 
UAR 

nove, astx, asty : INTEGER; 
alert_txt : str255; 
alert2 i converted; 
astnun : REAL; 
BEGIN 

astx := asteroid-ary [asteroid, 21 ; 
asty := asteroid_ary [asteroid, 31 ; 
nove_asteroid(astx, asty, 143) ; 
runble; 

astnun := (astx-61)*range/28e; 
alert_txt := 

' til EVoti nissed. Voulshould have tried|around 1( RETURN I'J 

conv(astnun, alert2) ; 
alert_txt[461 := alert2(ll; 
FOR nove := 2 TO 4 DO 

alert_txt(46 + novel != alert2 (novel ; 
dia := Do_Alert (alert_txt, 1) ; 
asteroid-ary [asteroid, 11 la 8; 
END; 

PROCEDURE clear-ary; 
UAR 

er,er2 : INTEGER; 
BEGIN 

FOR er := 1 TO 4 DO 

FOR er2 := 1 TO 3 DO asteroid_ary [er, er21 := 8; 

drop := 8; 
END; 

PROCEDURE ads(asteroid : INTEGER); 
BEGIN 

asteroid-ary [asteroid, 31 is asteroid_ary [asteroid, 31 + 37; 
nove_asteroid (asteroid_ary [asteroid, 21 , asteroid_ary (asteroid, 31-37, 
asteroid-ary (asteroid, 3) ) ; 
END; 



June 1988 ST-Log 



_ 



PROCEDURE advance; 
UAR 

asteroid : INTEGER; 
BEGIN . 
FOR asteroid := 1 TO 4 DO 
IF asteroid_ary [asteroid, 11 <> 8 THEN ads (asteroid! ; 

END; 

FUNCTION check-hit (nsx : INTEGER) I INTEGER; 
UAR 

asteroid, hit, asx : INTEGER; 
BEGIN 

hit := 0; 

FOR asteroid := i TO 4 DO 
BEGIN 

asx s= asteroid_ary [asteroid, 21 » 

IF (asteroid_ary[asteroid,ll <> 8) AND (nsx+4 < asx+12) 
AND (nsx*4 > asx) AND (hit = 6) THEN 
hit := asteroid; 

end; 

check-hit := hit; 
end; 

PROCEDURE blowup (asteroid, nsx : INTEGER); 
BEGIN 

launch (nsx, asteroid-ary [asteroid, 31 +6); , 
explode (asteroid_ary [asteroid, 21 +6, asteroid_ary [asteroid, 31 +6 ); 

asteroid_ary [asteroid, 11 : = 0; 

end; 

PROCEDURE niss (nsx : INTEGER); 
BEGIN 

launch (nsx, -20) ; 
END; 

FUNCTION check_niss : INTEGER; 
UAR 

asteroid, astnp : INTEGER; 
BEGIN 

FOR asteroid := 1 TO 4 DO 
BEGIN 

IF [asteroid_ary [asteroid, 11 <> 0) 
AND (asteroid_ary[asteroid, 31 > 138) THEN 
check-niss Is l; 

END; 
END; 

FUNCTION ground-hit : INTEGER; 
UAR 

asteroid, hit : INTEGER; 
BEGIN 
hit := 8; 
asteroid l= 8; 

WHILE (hit = 8) AND (asteroid < 4) DO 
BEGIN 

asteroid is asteroid + 1; 

IF (asteroid_ary [asteroid, 31 > 188) 

AND (asteroid_ary [asteroid, 11 OB) THEN hit is asteroid; 
end; 

ground-hit is hit; 

end; 



FUNCTION ast_left : INTEGER; 
UAR 

asteroid, lft : INTEGER; 
BEGIN 
lft := 8; 

FOR asteroid := 1 TO 4 DO 
BEGIN 

IF asteroid_ary [asteroid, 11 <> B THEN 
lft := lft + 1; 

end; 

ast-left s= lft; 
end; 
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BEGIN 
clear.ary; 
hit := 0; 
draw_screen; 
LOOP 

drop := drop + 1; 
IF drop < active + 1 THEN 
setpars (drop) ; 
advance; 

EXIT IF (ast_left < 1) OR Oil < 1) ; 
nun := input (range) ; 
ax := Round (nun«28B/range) +68; 
shoot := check-hit (ax) ; 
IF shoot <> 8 
THEN 

blowup (shoot, ax) 
ELSE 

niss(ax) ; 
IF ground-hit <> 0 THEN 
BEGIN 
snash (ground-hit) ; 
nl := nl -U 
END; 
draw_screen; 
END; 

h := hit; 
END; 



PROCEDURE nain; Cnain control loop} 
UAR 

hit : BOOLEAN; 

hits, astnun, totalh, totasts : INTEGER; 
BEGIN 
totalh := 8; 
totasts := 8; 
draw-screen ; 
nl := 5; 

dia := Do_Alert( 

'[21 [What level do you I want to start on?| l=easyl [ 1 | 2 | 4 ]',1); 

level := TRUNC(dia * 1.49); 

LOOP 

astnun := establ ish_diff iculty (level) ; 
do_gane (astnun, hits) ; 
totasts := totasts + astnun; 
totalh := totalh + hits; 
EXIT IF (nl < 1) OR (level > 6); 
level := level + 1; 
END; 



show_tal ly (totasts, totalh) ; 
END; 

BEGIN 

IF Init-Gen >= 8 THEN 
BEGIN 
dia := Do_Alert( 

'[lHDecinal Destroyer by | Kevin Kennedy using | Personal Pascal by OSS] I OK ]' 

Hide-Mouse; 
Clear-Screen; 
draw-screen; 
REPEAT 
nain; 

UNTIL : dia° zfl 2; rtt [21[D ° H ° U Want t0 PlaU aflain?1 1 VES I "0 ] 1 , 1) ; 
Set-Color (1, 1888, 1888, 1888) ; 
Set-Color (8, 8,8,8) j 

Set-Color (3, 8,8,788); 
Show-Mouse; 
Exit_Gen ; 
END 
END. 
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by Ian Chadwick 

"Whatever became of . . . ." 

A lot of conversations begin with 
these words when people learn of my 
past association with Batteries Includ- 
ed. People want to know what hap- 
pened. More often, people want to know 
what happend to the software BI had an- 
nounced that hasn't yet seen the light 
of day— the Elite series in particular. 
Somehow, in the acquisition of BI by 
Electronic Arts, a lot of products ap- 
peared to fall by the wayside. 

A lot of the time I have to answer, "I 
dunno," because EA never let me in on 
their plans. When I left BI, among the 
projects in the works for the ST were 
PaperClip Elite, Contact (aka Bute, 
the terminal emulator, once called Ter- 
mulator until someone realized the 
name was already in use), the Thun- 
dersaurus, B/Graph Elite, Consul- 
tant Elite, a revised Thunder and a 
few other programs. As far as I can tell, 
none of these are going to be released 
by EA, at least within the Age of 
Mammals. 

That's too bad. There were a lot of good 
products under development back be- 
fore New Year's 1987. Top of the list and 
the closest to completion was Scott 
Northmore's Consulant Elite. 

Scott had originally written an im- 
pressive database for the MS-DOS mar- 
ket, called Genapp. It was one of those 
products up in the application 
stratosphere— complex, powerful and 
flexible. He wrestled the user interface 
under a GEM shell, which made it con- 
siderably easier to use and more ap- 
proachable than the command-based 
ogres, dBase and Rbase, but sharing 
their capabilities nonetheless. 

Once running under GEM, the next 
phase was to move it over to the ST. But 
DRI's GEM in the PC/MS-DOS environ- 
ment isn't 100% the same as GEM in an 
ST, and translations aren't quite as sim- 
ple as one might expect. Still, Scott 
managed to tame the tiger to the point 
where we could honestly say it was 90% 



finished and ready for outside testing. 
The prototype worked, and the database 
engine itself performed properly— it was 
mostly a matter of tightening the user 
interface. It also promised to be the 
most powerful database manager avail- 
able for the ST by far. Then the troubles 
began. 

Michael Reichmann, president of BI, 
left for what appeared to be greener 
pastures (a company called Laser 
Friendly, involved in desktop 
publishing— soon to become a haven for 
several ex-BI employees). With him went 
a lot of the drive and determination that 

Do the 
designers 
think we live 
in a swamp? 
Think there 
might be a 
little bit of 
prejudice in 
the making 
of this 
product? 

kept BI going. The remaining manage- 
ment was indecisive and insecure. 
There were a lot of meetings, and thou- 
sands of words were spoken, but soft- 
ware publication — not to mention de- 
velopment and testing— virtually came 
to a standstill while psychic efforts were 
expended in useless hair-pulling and 
tooth-gnashing over the financial 
crunch BI found itself in. Those of us 
who wanted to continue on were power- 
less to get the wheels turning again. We 
marched towards the inevitable: the sale 
of the company. 

No one told Scott or any of the other 
software authors about this however. 
Management dithered and hesitated 



and hemmed and hawed while he 
worked diligently on his own. We were 
forbidden to discuss the situation with 
any of the authors in case it jeopardized 
the negotiations with Epyx and later EA. 
That only lead to a lot of angry, frustrat- 
ed programmers and developers. Not to 
mention the angst many of us at BI felt 
over this sort of treatment. 

Suddenly, or so it seemed, the whole 
thing ended. BI went into receivership, 
people were fired without warning- 
most without being given proper notice 
or sufficient separation pay (myself in- 
cluded). But it was people like Scott who 
were really left with the short end of the 
stick. 

Scott had brought Consultant Elite to 
the beta test stage, but what now? EA 
held the rights to all products, even 
those in development, and were slow to 
release them— even those they had no 
intention to publish. Scott finally got the 
rights for his program back in 
December— nine months or so after the 
sale. For nine months he couldn't legal- 
ly do anything with Consultant. All that 
work didn't generate any income. 

Scott realized they would have to 
return the rights sooner or later, so he 
was resourceful enough to approach 
several other ST software publishers in 
the meantime. But with the rights in 
limbo for so long, one could or would 
make a commitment to the program. 
Worse, perhaps, several companies were 
interested but realized the responsibili- 
ty for supporting such a high-end 
product was a major undertaking out- 
side their realm. They were impressed 
and excited by the program, but lacked 
either resources or stamina to provide 
the requisite support staff Consultant re- 
quired. And that bodes ill for the de- 
velopment of serious ST software in the 
future. 

So Consultant Elite is still 
unpublished— potentially one of the 
most powerful database programs for 
the ST, a professional-level product that 
won't see the light of day because Scott 
can't And a publisher willing to support 
it. That's not to say there aren't good 
database programs out there now, but 
the likelihood of seeing more of such or 
better programs in the future is slim 
(competition means better end products 
and real choice— and very few publish- 
ers seem willing to enter the fray). 

A similar late befell B/Graph Elite. It 
seems no one can see the need for a 
serious statistical/graphing program 
(with a spreadsheet data-entry interface) 
in the ST market. Sure, these programs 
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sell well, and are in demand in the 
PC/MS-DOS world, but ST software pub- 
lishers seem to shy away from the 
upper-end products. Either that or they 
haven't the foggiest idea what they 
should be selling. 

All this makes me somewhat nervous. 
It's like we're doomed to seeing the ST 
become a great game machine, or a su- 
per midi-controller, but with a dearth of 
products aimed at the business/ 
professional user. And face it folks, 
professional users are staying away in 
droves. 

After all, what do you have for the ST 
we can truly say falls into the profes- 
sional category? Anything the likes of 
1-2-3 (or Quattro or Excel), Sidekick, 
Desqview, Symphony, Framework, Para- 
dox, Ready, Keyworks, Ventura, Gram- 
matik, Prolog Tornado Notes, and so on? 
I doubt that any of their publishers will 
release for the ST. It's seen as a game 
machine by most outsiders. And in ord- 
er to change that attitude, we have to see 
more top-level products produced and 
sold by existing ST publishers. 

Sure, Word Perfect Corp. released 
Word Perfect 4.1— so far the only 
publisher of note in the PC/MS-DOS 
world to do anything of that sort. So, at 
last, we have a word processor that can 
be considered professional quality. What 
else? The sad truth is that we simply 
don't have much (if any) software in the 
PC/MS-DOS league. 

I really don't want to pick holes in ev- 
ery product and whine about what we 
don't have. In truth, a lot of what's out 
there is pretty good, but it's all based on 
a perception of home market needs and 
prejudices; it's pretty much still a cot- 
tage industry. Maybe we're to blame. 
Maybe most ST buyers don't want the 
business and professional-level software; 
they want lightweight products, simple 
utilities and lots of games. In that case, 
Word Perfect may well fail to sell big in 
the ST market, despite the quantity of 
features it offers (it towers over any other 
ST word processor). 

Of course, the home market is where 
Atari seems to be aiming its best shot. 
I don't see a single ST in use in any cor- 
porate environment. Can anyone name 
a member of the Fortune 1000 that uses 
STs? Apple has managed to get the Mac 
into a lot of businesses. Why not Atari? 

Well, in part, it's because they can't ap- 
proach a major business seriously 
without some solid software to offer 
them. Can you imagine Atari trying to 
sell to a major corporation? 

"Well, no, we don't have networking, 



no simple means to move flies from 
your existing PCs, no suitable terminal 
emulation for your mainframe conne- 
tion, software lacks full compatibility 
with your 1-2-3 and dBase flies, and the 
keyboard is medicocre, but you can play 
some great games on it. . . ." 

Maybe I'm just in a bad mood. I get 
depressed when I go into a software 
shop and see the shelves full of PC/MS- 
DOS products. I'd like to see things 
change and find products like Scott's 
Consultant Elite (or whatever he's call- 
ing it now— maybe Genapp Elite?) and 
B/Graph Elite in my local software store 

Maybe I'm 
just in a bad 
mood. I get 
depressed 
when I go 
into a 
software 
shop and see 
the shelves 
full of PC/MS- 
DOS 

products. 

soon, before the ST becomes the C64 of 
the 80s. 

Ah, so that's why they never got in 
touch. 

Remember back when, I made a fuss 
about Sublogic not doing a Flight 
Simulator scenery disk for my own 
area (Toronto)? I even wrote them twice 
and begged them to release the informa- 
tion for creating a scenery disk database 
so local users could design their own 
places to fly (or create fantasy places- 
why not?). In response, I got a written 
equivalent of the cold shoulder from 
them. 



Well, imagine my surprise when I dis- 
covered that Scenery Disk 11— the 
"Detroit/Lake Huron" disk— has Toron- 
to on it! And a good deal of southern On- 
tario too. But they don't mention it any- 
where on the package. I booted my FS2 
and skewed over to find out why. 

If you know the city you'll under- 
stand why Sublogic is reluctant to admit 
to having Toronto on any their disks. 
Toronto is, after all, not an American 
city. Just because it's the largest city in 
Canada, with roughly Ave million peo- 
ple in the combined metro and subur- 
ban regions, doesn't mean they should 
give it any special treatment, right? And 
the fact there are more ST owners in 
Soutern Ontario than anywhere else in 
the country shouldn't bother them 
either, I suppose. 

Well, imagine my disappointment: 
Toronto is given one single building— 
the CN Tower— around which we can fly. 
Detroit— roughly the same size and 
population— has oodles of interesting 
places to see. At night, FS2's Toronto is 
as black, bleak and dreary as a morgue. 
And to add insult to injury, Pearson In- 
ternational Airport— as busy as Chica- 
go's O'Hare— is missing from the book- 
let and map listing and was given no 
buildings in the database, not even a 
lousy hangar! And where are the dozens 
of large satellite communities that sur- 
round this city? Consigned to FS2 lim- 
bo, no doubt. Finally, what's with all the 
lakes that look like half-cooked fracted 
pancakes that cover the northern land- 
scape? Do the designers think we live in 
a swamp? 

Think there might be a little bit of 
prejudice in the making of this product? 
Look, as a Canadian, I'm accustomed to 
getting the short shrift from Americans 
who think that the world ends at the 
border, but this is carrying it too far; it's 
a smack in our faces. It would have been 
better had Sublogic not included Cana- 
da at all than to insult us with such a 
piddling poor effort. 

My love of FS2 has suffered a serious 
blow with this scenery disk. And I'm 
not the only one who feels this way up 
here. Fellow enthusiasts have discussed 
it with me in several stores— all equally 
grieved at the offhand manner in which 
our own area was handled. It casts a 
dark shadow on any claims to accura- 
cy that the scenery disks might ever 
carry in the future. Sublogic, are you 
listening? If you ever want us on your 
side again, you'd better recall those 
disks and fix them up, soon, before the 
damage is irreversible, jr 
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STPlus»STPlus«STPlus»STPlus 

P.O. 1197, Berkeley, Ca. 94701 

We all want the ST to grow, so let's BUY MORE SOFTWARE and discourage pirating! 



BUSINESS 



DBMan 4.0 175.00 

Datamana'ger 56.00 

Superbase 104.95 

Trlmbase 69.95 

Phasar 63.95 

Zoomracks 2 84.95 

Base 2 42.95 

The Informer 69.95 

WordPerfect 189.95 

1st Word Plus 69.95 

WordUpl 74.95 

Best Accounting 279,95 

Equal Plus 139.95 

Inventory Mgr. 69.95 

Rolobase Plus 63.95 

Loglstlx Spread 104.95 

Mlcrolawyer 49.95 

Payroll Master 69.95 

Construction EST. 35.00 

Microsoft Write 94,95 

Datatrleve 35.00 

STOneWrtte 48.95 

VIP GEM 104.95 

DacEasy Payroll 48.00 

DacEasy Acctg 52,00 

WordWrtter ST 56,00 

SwIftCalc 56,00 

EZ Calc by Royal 48,95 

Analyze Spread 104.95 

Final Word 99.95 

PubllshrngPartner 140.00 

T-works Publish It 104,95 

EZData Base 48.95 

Chart Pak 35.00 
Compute Roots 
Thunder NEWI 
Habawrtter 2 
Text Pro 
Becker Text 
Expert Opinion Al 
Time Link 
Partner ST 
Labelmaster Elite 
ST Accounts 
The Juggler 
Max Pack 
Stuff 
Flash 1.5 

SBT acctlng ea. 
Omni Res 
Turbo ST(-blltter) 
Dollars & Sense 



GRAPHICS 



Degas elite 55.95 

CAD 3D 2.0 63.95 

Cyber Paint 49,00 
Quantum 4039 

Adv Art Studio 26.00 

Spectrum 512 49,00 

EzDraw&Superch 104,95 

Canon Scanner 1040.0 
GFA Artist lOOOd 55.95 

Draflx 1 139.95 
Athena 2 69.95 



GAMES 



G unship 

Shadowgate 

Uninvited 

Mouse Quest 

Slaygon 

Barbarian 

Obllterator 

Guantlet 

Dark Castle 

F- 15 Strike Eagle 

Star Trek- Rebel U. 



How would you like to be an 

ST dealer? If you are 
interested, I am looking for a 
few limited partners to work 
with in areas which lack ST 
support. This is not a 
solicitation by Atari or to 
circumvent Atari's network 
but an invitation to work with 
an established dealer to set 
up new dealerships. I am 
especially interested in VAR's 
for business and education. 



RAMMIN 



GFA Basic 48.95 

GFA Book 35.00 

27.95 GFA Compter 42.00 

28.95 Mark Wlllams 'C 12 5 00 

Laser 'C 159.95 

Cambridge Lisp 139.95 

RAID 27.95 

Fast Editor 35.00 

Alice Pascal 69.95 

OSS Pascal 59,95 

Fortran 77 GEM 139.95 

BCPL 104.95 

Mdula2 dev. kit 104.95 

Assempro 48.95 

Fast Basic 56.95 

True Basic 69.95 



48.95 
35.00 
62.95 
59.95 
35.00 
48.95 
35.00 
149,00 
35,00 
35,00 
27.95 
21.00 
275,00 
27.95 
35.00 
69.95 



EDUCA1IONA 



Arakb Series 
Unicorn Series 
True Basic Stuff 



GAMES 



Tanglewood 
Test Drive 
Chessmastr2000 
StarGliderbw&cl 
Hunt for Red Oct 
Police Quest 
Allants 
Allen Fire 
Santa Paravta 
Lurking Horror 
Star Fleet 1 
Empire 

Llesure Surt Larry 
Grldton 

Dungeon Master 
Flight Simulator 
Tralblazer 
••SPECIALS ~~ 
Jewel of Darknss 



MUSIC 



35.00 <Sassvort 
35.00 Master Tracks 
35.00 MasterT racks Jr. 
14.00 Mldboft Studio 

27<? 5 Smpte Track 
27.95 sync Track 
35.00 Ez Track pi^ 

27 - 95 Mldbcore 
27 - 9 5 EZ Score Plus 
2 7.95 DX-Androld 
CZ-Android 
Gen- Patch 
D-50 Editor 
Voice Masters 
Yamaha TX81Z 
Roland AJ 1 8i 2 
Yamha 21,27,100 
Oasis Editor 
Hybrlswltch 
ADAP Smptecue 
upgrade old box 
MIDI- MAZE 
ADAP 2 direct to 
60mg.hd sampler 
Midlplexer 

Dr. T's 

KCSequencer 
KCS 1,6 w/ PVG 
MIDI rec studio 
NEW Copyist 

Chutah (Midi Inst. 
MK5 Keyboard 
MK5II 

32 95 MK5V 
35 00 MIDI Drum 
™" Power Play Drum 
Drum Interfacer 
Synth Module 
SMPTE to MIDI 
DX Heaven edltr 
Korg, Kawaletc 
CZ Patch editor 
CZ patches 
DX patches 



HARDWARE 



27.95 
35.00 



14.00 
27-35 _ 

69.95p silcon Dreams 

National (800) 433-6122 California (800) 874-4789 (415)849-1717 Prices subject to change without notice 
We ship ANYWHERE! $4.00 min S&H. No 1040's or Megas mail order. Hand delivery only, list plus $100. 

CIRCLE #112 ON READER SERVICE CARD. 



35.00 
21.00 
27.95 
39.95 
39.95 
27.95 
35.00 
27.95 

20 meg hard disk 
^ /,vo 30 meg 

~ Atari CD-ROM 



280.00 
104.95 
69.95 

499.95 
299.95 
48.95 
call 
104.95 
139.95 
69,95 
104,95 
call 

69,95 
69,95 
55.95 

175.95 
21,95 

175.95 
70.00 
27.95 

2795.0 

249.95 

199.95 
289.95 
27.95 
139.95 

249.95 
399.95 
549.95 
794.95 
339.95 
369.95 
119.95 
534.95 
349.95 
104.95 
call 
79.95 
39.95 
39.95 



558.95 
749.95 
1249.95 
499.95 



by Andy Eddy 



As you may have discovered, there's 
quite a range of SIG topics on Delphi: 
some detail various brands of com- 
puters (as we do in the Analog/Atari 
SIG); others reflect specific interests 
(such as the Micro Artists, or MANIAC 
SIG, as it's called). All of them are for- 
matted similarly using the software 
Delphi has implemented for the system 
operation, but each area has been 
molded into a unique venue. The SIG 
managers) decides what topics will 
best reflect the interests of their mem- 
bers. In the Atari SIG, we have ours 
divided into specific ST and 8-bit 
categories that make it easier to scan 
through the megabytes of files and 
messages available. 

This structure is defined by the SIG 
Manager and Delphi's people, so that 
anyone coming in will be greeted by 
consistency and comfort— an impor- 
tant consideration if you want to keep 
people coming back time after time. 



There's no doubt that many informa- 
tion providers' menu structures can be 
very cryptic, leaving the user's wallet 
at the mercy of the documentation, but 
I feel that Delphi is on the top end of 
all the systems when it comes to clari- 
ty, because of their employment of En- 
glish in the menus. 

Regardless of what service you use, 
though, the structure is generally firm- 
ly in place, and there's not much the 
user can contribute directly (other 
than suggestions) with regards to how 
the system is laid out. Delphi, as an ex- 
ception, has one area that is entirely 
open to the creativity and whim of the 
users, allowing surveys to be created 
and voted on in whatever topic they 
choose— computer-oriented or not. 
Let's look at the P section in a little 
more depth. 

At the time of this writing, the Poll 
area had been cleared of all but the 



most recent entries. In the past, it has 
brought queries ranging from whether 
or not there is interest in buying or up- 
grading to a Mega ST, to what kind of 
games are most popular and even the 
feelings about the quality of the new 
Star Trek series. Diversity, to say the 
least. 

If you have some time, you can garn- 
er a good cross section of data on any 
subject. I've also used the polls to in- 
formally research demographics in 
specific areas of the Atari community 
and used the results in articles. For ex- 
ample, one of the current polls is at- 
tempting to determine who is the fa- 
vored candidate in the presidential 
campaign. 

To enter the polling area, type POLL 
from the Analog < prompt. It can ac- 
tually be abbreviated PO or P, as long 
as you make the selection unique 
enough that Delphi knows what you 
are specifying. We'll discuss this more 
in detail later. 

Once you get the POLL< prompt, the 
menu reads-. 

BROWSE through poll results 
CREATE a new poll 
EDIT your poll comment 
HELP 

LIST poll names 
RESULTS with comments 
EXIT 

POLL=> (BROWSE, CREATE, EDIT, 
LIST, RESULTS, VOTE) 

Getting to the Poll Position 

If you opt to create a new poll, the 
prompts that Delphi gives are usually 
enough to get you through. The first 
thing asked for is the poll name. After 
naming the poll, you are given the 
choice of what kind of poll you would 
like: Yes/No, Multiple Choice or a range 
between Strongly Agree and Strongly 
Disagree. This provides any configura- 
tion that you may need for getting the 
best data possible. 

After the construction process is 
finished, Delphi makes the survey pub- 
lic, adding it to the existing list for vot- 
ing and optional comment. In a poll I 
just created (this is being written in 
early March), I'm trying to get an idea 
of which ST game titles are the most 
popular. For that reason, I've made the 



poll multiple choice so the respondents 
can add titles that I didn't originally 
place on the list. Here's what it looks 
like after typing RE GA (short for 
RESULTS GAME) from the POLL> 
prompt: 

POLL> (BROWSE, CREATE, EDIT, 
LIST, RESULTS, VOTE) re ga 
GAME HALL OF FAME, created by 
ANAL0G2. 

Creation date: FEB. 29, 1988 

There has been a good amount of talk 
recently, given the release of Dungeon 
Master (by FTL), about some of the great 
gameware there is for the ST. Take 
some time to tell us what you think is 
the best in your view. You can enter 
your own choices, even come back 
later and change your mind if you see 
a better selection. Please note in your 
comment what you chose so others 
know what you are commenting on. 

CHOICE VOTES PERCENT 



Dungeon Master 


1 


25% 


StarGlider 


1 


25% 


Pawn 


0 


0% 


Oids 


1 


25% 


Test Drive 


0 


0% 


Time Bandit 


1 


25% 


Universal Military S 


0 


0% 


TOTAL VOTE: 


4 





Comments: 

Time Bandit has the right stuff to make 
me keep coming back and back after 
affairs with StarGlider, Ogre, or even 
Gunship. I added UMS,but my vote goes 
to the hands-down winner — DM! While 
I think Dungeon Master is a great ad- 
venture, I'm not an avid adventurer. 
Rather, I opt for the arcade talents of 
Oids and its editor section that lets you 
add more galaxies to the ones that 
came with the game. A E 
VOTE on this poll? (Y/N) 

There's no easier way to find out user 
interest and have the results compiled 
than to use the poll software Delphi has 
provided. Stop by every now and then 
to vote on new polls, update your previ- 
ous responses or add you own polls. 
DELPHI NEWS 

As this is being written, Delphi is 
finishing up the beta testing of some 



new features in their system software. 
One of those is the addition of Ymodem 
Batch for file transfer in your work- 
space and the databases. Those who 
send and receive files already should 
be familiar with Xmodem, a transfer 
protocol that breaks the file down into 
128 byte chunks or "packets," and 
sends them in a hands-off operation. 
Each block also contains a checksum 
so the transmitting terminal can con- 
firm accurate reception by the receiver. 
If an error is encountered, the block is 
automatically reset. 

Similar to Xmodem, Ymodem sends 
the file in IK blocks, which generally 
results in quicker transfers overall. An 
enhanced version of Ymodem— called 
Ymodem Batch— allows groups of files 
to be sent in IK packets, as opposed to 
the manual one-by-one situation that 
currently exists. 

Let's say you wish to download four 
ARCed (Archived) files that reside in 
your workspace. Ymodem Batch allows 
you to select files one at a time or with 
wild cards, and then start the chained 
transfer of all the files. In the above sit- 
uation, YBatch (as we'll call it) is in- 
itiated, you could type YBD * ARC 
(which tells Delphi to YBatch Download 
all files with an .ARC extender) from 
the WS > (workspace) prompt. Of 
course you'll need to use terminal soft- 
ware that supports YBatch— the latest 
versions of Flash, Interlink and ST- 
Talk Professional 2.0, all offer 
YBatch compatibility. 

When you tell your software to begin 
the transfer, the other comfort of 
YBatch becomes apparent: the file- 
names are sent automatically with the 
file. Folks like myself who are extreme- 
ly lazy now can vegetate further in 
• front of their terminal; better yet, some 
terminal software is being designed 
with "background transfer" ability, 
which functions like a printer spooler. 
It allows you to continue with other 
processes while it transfers the file 
from a buffer area in memory; this, in 
essence, enables you to double your 
productivity. Who said the ST can't 
multitask? 

That about covers it for now. Till next 
month, C U online // 
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BASIC 
Draw 



by Colin Faller 



High Resolution 
Only 



Many people complain about ST BAS- 
IC, saying that it's impossible to use it 
to create a full-fledged GEM-style pro- 
gram. BASIC Draw is an example of 
just what can be accomplished with ST 
BASIC if you're willing to apply your- 
self to the task. Programmers will find 
the menu system used in BASIC 
Draw to be of special interest. 

Note that owners of either the 1040 
ST or a one-megabyte 520 ST will have 
to alter the program slightly. This is 
due to a difference in the location of 
screen memory. All you have to do is 
change the statement MEM1 = 
494560 in Line 8 to MEM1 = 1018848. 
The progam should then work with 
your machine. 

Unfortunately, this program runs 
only in high resolution; so if you've 
been thinking about getting a 
monochrome monitor, now would be 
a great time to do it. 

The program 
When you run BASIC Draw, it'll 
take about three seconds to initialize, 
after which the main screen will be 
drawn and the mouse pointer will ap- 
pear (in the form of a pointing finger). 
The screen is divided into three areas. 
The large area to the left is the draw- 
ing screen. The area on the right is for 
the menu and selected functions. The 
third area, located at the top of the 
screen, contains four boxes and a Busy 
box . 

The first box is used for the Circle, 
Box, Ellipse and Polygon functions. 
When BASIC Draw is the first run 
the box will be white. But after select- 
ing one of the fill styles, the pattern 
selected will automatically show in this 
box. The second box is used only in Air- 
brush mode. It shades in with a com- 
bination of white and black. The third 
and fourth boxes are used for the Erase, 



Line 1, Airbrush, Mirror, Circle, Box, 
Ellipse, Line 2 and Polygon functions. 
The Busy box lights when you can't use 
the mouse pointer. 

The following is a quick overview of 
the functions available in BASIC 
Draw. To activate the menu, simply 
move the mouse pointer over it. 



REVERSE 

FILL 1 
FILL 2 
ERASE 
LINE 1 

AIRBRUSH 

MIRROR 

TEXT 

CIRCLE 

BOX 

ELLIPSE 

LINE 2 

POLYGON 

CLEAR 
EXIT 

LOAD/SAVE 



Reverses the screen 
from black to white or 
white to black 
Fills in an area with one 
of the 36 GEM styles 
Fills in an area with one 
of 15 Customized styles 
Used to erase small sec- 
tions of your drawing 
Lets you draw freehand 
in any of three-line 
thicknesses 
Used to shade areas of 
your picture 
Turns on the mirroring 
option 

Allows you to put text 
on the drawing screen 
Draws a hollow or solid 
circle of any size 

Draws a hollow or solid 
box of any size 

Draws a hollow or solid 
ellipse of any size 
Draws a straight line 
between two points 
Draws a filled, multiple- 
sided shape 
Clears the screen 
Returns to BASIC 
Loads or saves a picture 
to disk 



Now that you've got a nodding ac- 
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quaintance with the program, let's look 
at some of the features in more detail. 
To select a function from the menu, 
move the mouse pointer over your 
selection, and press the left mouse but- 
ton (LMB). 

Fills 

When you select FILL 1 function 
you're given a choice of 36 different fill 
styles. To select a style, move the 
mouse pointer over the one you want 
and press the LMB. The style you have 
selected will be displayed in a box 
above the different styles and also in 
the top corner of the screen. To fill a 
part of your drawing, move the mouse 
pointer to the part to be filled and press 
the LMB. The Busy box will go on while 
the fill is working. 

FILL 2 is the same as FILL 1, except 
you can choose from 15 custom fill 
styles. 

Erase 

When you choose this function, 
you'll first need to choose one of the 
eight "size boxes" at the bottom of the 
screen. To select an erase size, move 
the mouse pointer to the required size 
and press the LMB. Then select the 
color (black or white) the same way. To 
erase part of your drawing, move the 
mouse pointer to the area you want to 
erase and move the mouse over the 
area, holding down the LMB. This func- 
tion can also be used as a thick draw- 
ing line. 

Line 1 

There are three different line thick- 
nesses to select from. To select a line 
thickness move the mouse pointer to 
one of the three choices and press the 
LMB. Also select one of the two 
colors— black or white— in the same 
way. To draw with the mouse, move the 



mouse pointer onto the drawing 
screen, and when you want to draw, 
press the LMB. To stop drawing, release 
the button. 

Airbrush 

This function is used for shading in 
parts of the screen. Select one of the 
three different shades and press the 
LMB. To "spray" an area, move the 
mouse pointer over the area while 
holding down the LMB. 

Mirror 

You are given three different types of 
mirror styles. Style 1 gives you 
horizontal mirroring, Style 2 gives you 
vertical mirroring , and Style 3 gives 
you both. To select a mirroring style, 
place the mouse pointer on one of the 
mirror icons and press the LMB. Colors 
are selected in the same way. To draw, 
place the mouse pointer on the draw- 
ing screen and hold down the LMB. 
Whatever you draw will be "mirrored" 
in whatever manner you selected. 

Text 

Text is the most complicated of all of 
the functions. Instead of using just one 
menu area, it requires two: one for 
selecting characters and the other for 
selecting the size and type of charac- 
ters. To switch between the two menus, 
press the RMB. 

To select the character size and type, 
first press the RMB. You will then be 
able to choose between five character 
sizes and five character types. At the 
top of the function screen, there will be 
a square containing the letters "ABC." 
The letters show you the currently 
selected text style. In the middle of the 
menu area, there are five boxes num- 
bered 1 to 5. These are used to select 
your character size, where 1 is the 
smallest and 5 is the largest. To select 
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a character size or type move the 
mouse pointer over the one you've 
selected and press the LMB. The styles 
available include bold, grayed, skewed, 
underlined and outlined. To turn off an 
option, just "re-select" it. 

At the bottom of the menu, you can 
select either black characters on a 
white background or white characters 
on a black background. To select the 
color, move the mouse pointer over the 
one you want and press the LMB. 

To print the characters to the screen, 
return to the original menu by press- 
ing the RMB; then move the mouse 
pointer onto the drawing screen. The 
mouse pointer will be replaced with a 
square cursor the size of which will de- 
pend upon the character size you 
selected. Place the cursor where you 
want the text to begin and press the 
LMB. The computer will calculate the 
number of characters that will fit on 
the screen from your selected position. 
The number will vary, of course, ac- 
cording to the size and style of the 
characters, and the location of the cur- 
sor. The maximum number of charac- 
ters will be displayed at the top of the 
screen. To cancel the text location and 
choose another, move the mouse 
pointer over the letters ABC and press 
the LMB. 

Now you can select the characters to 
print with the mouse. To display a 
different "page" of characters, click on 
one of the boxes numbered 1 to 4 with 
the LMB. To select a character, move 
the mouse pointer to the character you 
want and press the LMB. The charac- 
ter is then displayed at the top of the 
screen. When you have finished "ty- 
ping" the characters, print them to the 
screen by moving the mouse pointer to 
the text line at the top of the screen 
(where the characters appeared as you 
selected them) and press the LMB. 
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Circle 

You can choose between a solid or 
hollow circle. Move the mouse pointer 
to the style you want and press the 
LMB. If you select a solid circle, you can 
use any one of the three fill styles, the 
colors black or white or your own style. 
Select a fill style by moving the mouse 
pointer to the style you want and press 
the LMB. 

There are three boxes at the bottom 
of the screen which are labeled "Plot," 
"Radius" and "Mouse Pos." The latter 
is the position of the mouse pointer. 
Plot is used to plot the center point of 
the circle. Move the mouse pointer to 
the center point of the circle and press 
the LMB. The Radius will set itself to 
zero. To draw the circle, move the 
mouse pointer to the right of the 
center point if you've selected a solid 
circle, or left or right if you've selected 
a hollow circle, and then press the 
RMB. 

Box 

This function works similarly to the 
circle function. The only difference is 
a change in the three boxes at the bot- 
tom of the function menu. Instead of 
Radius, you have a Size, and the Plot 
function now plots the upper left corn- 
er of the box. 

Ellipse 

This function is also similar to Circle, 
but now the radius has two values.To 
draw the ellipse, you can move the 
mouse pointer in any direction you 
need to get the proper size. 

LINE 2 

This function is used to draw a 
straight line between two points. This 
requires two operations: Plot (P) and 
Draw (D). First plot the starting point 
of your line by pressing the LMB. Select 
the line's endpoint with the RMB, and 
a line will be drawn between the two 



points. 

Notice that, on the function menu, 
there are two boxes labeled P and D. 
When you first enter this menu, the P 
function will be activated (it'll be un- 
derlined). When you draw lines in this 
mode, the point you first plotted is al- 
ways used as the beginning point of 
your line. Each time you press the 
RMB, a line will be drawn from the 
original plot point to the position of the 
mouse cursor. This allows you to draw 
multiple lines, all with the same start- 
ing point (sometimes this type of line 
is called a ray). When D is selected, 
repeated presses of the RMB will cause 
a line to be drawn from the previous 
line's ending point to the position of 
the mouse cursor. Using this function, 
you can draw complicated shapes. 

Polygon 

This is similar to Line 2 with the D 
option set, except it allows you to draw 
a Riled shape made up of up to 63 lines. 
The fill style is selected in the same 
manner discussed previously. To fill a 
shape, move the mouse pointer to the 
box below the word "Polygon" and 
press the LMB. 

Load and Save 

To load a picture, move the mouse 
pointer over the Load menu selection 
and press the LMB. You must then 
choose one of the 12 files to load. Move 
the mouse pointer over the file you 
want and again press the LMB. To can- 
cel, press the RMB. 

The save function works the same 
way. 

Colin Fuller is 21 years old and 
lives in the Northeast of England 
about a half mile from the coast. He 
has been programming with Atari 
computers for 3Y2 years. 
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Listing I: ST BASIC 

1 REM XXMMXXXXMMXXMMMMXXMMMMMM 

2 REM BASIC DRAM 

3 REM BV COLIN FALLER 

4 REM 

5 REM Copyright 1988 

6 REM by ST-Log 

7 REM XXXXXXXXXXXXXXMXXXXXXXXX 

8 MEM1=494568:REM **** One neg ST cha 
nge fron 494560 to 1018848 »*** 

9 WAUE 7:C0X=570:C0V=115:SZ1=13:SXj:=10 
: SVX=16 : QMX=2 : QNX=0 : CXX=0 : CYX=416 

10 FULLW 2:GEM=SVSTAB+24:P0KE GEM, 1 : Alt 
=GB:Z9=PEEKCAtt+8) :G0T0XY 31,15:?" "J 

11 I=IHTIH:C=CONTRL:P=PTSIH:POKE C, 11: 
POKE C+2, 2: POKE C+6, 8: POKE C+10, 1 

12 BPX=3 : RESTORE 15: FOR UV=1 TO 36:REA 
D AA,BB,CC,DD, EE: COLOR 1, 1, 1, EE, EE 

13 IF EE=4 THEN COLOR 1,1,1,4,2 

14 POKE P, AA : POKE P+2, BB : POKE P+4, CC:P 
OKE P+6, DD : UDISVS (1) : NEXT UV 

15 DATA 0,0,640,400,1,3,3,528,31,4,534 
, 50, 634, 394, 4, 3, 387, 528, 394, 4, 0, 37, 530 

16 DATA 383,0,533,69,637,89,1,533,2,63 
7, 49, 0, 572, 145, 596, 157, 1, 533, 71, 637, 92 

17 DATA 0,553,11,617,42,1,553,11,615,4 
O, 4, 557, 15, 609, 34, 1, 559, 17, 611, 36, 6 

18 DATA 533,103,637,123,1,533,185,637, 
126, 8, 574, 147, 598, 159, O, 552, 175, 616 

19 DATA 211, 1,554,177, 618, 213,0, 533,29 

4, 637, 330, 8, 533, 292, 637, 293, 1, 448, 6 

20 DATA 519, 25,1,450,8,521, 27,0, 452, 10 
, 519, 25, O, 360, 6, 411, 25, 1, 362, 8, 413, 27 

21 DATA 0,364,10,411,25,0,260,6,311,25 
, 1, 262, 8, 313, 27, 0, 264, 10, 311, 25, 1, 160 

22 DATA 6,211,25,1,162,8,213,27,0,187, 
10, 211, 25, 1, 164, 18, 187, 25, 0, 60, 6, 111 

23 DATA 25,1,62,8,113,27,0,64,10,111,2 

5, 0, 77, 69, 78, 85, 569, 32, 66, 85, 83, 89, 456 

25 POKE C, 8:P0KE C+2, 1:P0KE C+6,4:F0R 
XX=1 TO 2 '• READ AA, BB, CC, DD, EE, FF 

26 POKE I,AA:POKE I+2,BB:P0KE I+4,CC:P 
OKE 1+6, DD: POKE P, EE: POKE P+2, FF 

27 UDISVS CI) : NEXT XXiPOKE C,11:P0KE C+ 
2, 2: POKE C+6, 0: COLOR 0,0,0 

30 CC9=l:CA9=l:LX=33:LV=24 

40 FOR XX=1 TO 9: READ AA, BB, CC, DD : POKE 

P, AA : POKE P+2, BB:POKE P+4, CC 
42 POKE P+6, DD : UDISVS (1) : NEXT XX:COLOR 

1,1,1 SPOKE P, 455JP0KE P+2, 10 

44 DATA 23,637,0,639,400,0,0,639,2,0,3 
97, 639, 399, 531, 8, 533, 400, 534, 47, 639, 49 

45 DATA 0,34,533,36,0,0,2,36,0,387,2,3 
99,0,384,533,386 

46 POKE P+4, 500:POKE P+6, 10 : UDISVS CI) : 
POKE P,455:P0KE P+2, 25: POKE P+4, 500 

50 POKE P+6, 25 : UDISVS CI) : G=PEEK CAtt+12) 



:?"RESOLUTION":POKE C, 106:P0KE C+2, 0 
53 POKE C+6, l:POKE I, 16 : UDISVS CI) : POKE 
C, 12: POKE C+2, l: POKE C+6, 0 

55 POKE P+2, 12: UDISVS CI) : FOR VU=32 TO 
36: READ ZX$:GOTOXV VU, 2 : ?ZX$ : NEXT VU 

56 FOR VU=35 TO 32 STEP-1 : READ ZX$:GOT 
OXV VU, 4:?" ";ZXS:NEXT VU 

57 DATA B, A, S, I, C, W, A, R, D, 1, 2, 602 

58 POKE C, 106: POKE C+2, 0: POKE C+6,1:P0 
KE I,4:UDISVSC1) :POKE C,12:P0KE C+2, 1 

60 POKE C+6, 0 : POKE P+2, 6:UDISVSC1) :GOT 
OXV SS^^-COLIN-SGOTOXV 33,9 

61 ?"FALLER" : POKE C, 106:P0KE C+2, 0:POK 
E C+6,l:P0KE I, 0 : UDISVS CI) : POKE C, 12 

62 POKE C+2, lsPOKE C+6,0:POKE P+2, 6:UD 
ISVSC1) iGOTOXV 34,6:?"BV ,, :G0T0XV 32,16 

68 FOR TU=1 TO 7 : READ AA, BB, CC, DD : COLO 
R 1,1,1, AA,BB:FILL CC,DD:NEXT TU 

69 DATA 40,2,2,588,40,3,2,564,47,4,2,5 
55, 47, 6, 2, 568, 84, 4, 2, 580, 84, 2, 2, 590, 84 

71 ?"S30 » 3HS":P0KE Z9, 3 : GEMSVS C78) : P 
OKE Z9, 257: GEMSVS C78) 

72 POKE P+2, 13:UDISVSC1) : POKE C,11:P0K 
E C+2,2:P0KE C+6,0:POKE C+10, 1 

75 GEMSVS C79) : IF PEEK CG+2) >552 AND PEE 
KCG+4X38 THEN 88 ELSE 75 

80 POKE Z9, 256SGEMSVSC78) :POKE Z9, 3:GE 
MSYSC78) 

81 POKE C, lliPOKE C+2, 2:P0KE C+6, 0:POK 
E C+10, liCOLOR 1,1,1,4,2 

82 FOR GI=0 TO 50 STEP 10:P0KE P, 584-G 
UPOKE P+2, 10O-GI:POKE P+4,586+GI 

83 POKE P+6,346+GI:UDISVSCl) :NEXT GI:R 
ESTORE 86:F0R VU=1 TO 6 : READ AA, BB, CC 

84 READ DD, EE, FF : COLOR 1, 1, 1, EE, FF : POK 
E P,AA:POKE P+2, BBiPOKE P+4, CC 

85 POKE P+6,DD:UDISVSC1) :NEXT VU:FOR U 
T=74 TO 360 STEP 34:I=INTIN 

86 DATA 534,50, 635,395,4, 2, 534, 50, 634, 
394, 4, 2, 547, 55, 618, 72, 1, 1, 537, 72, 627 

87 DATA 378,1,1,549,57,620,74,0,0,539, 
74, 629,380,0,0 

90 POKE P+2, UT : POKE P+6, UT+17 : UDISVS CI 
) : NEXT UTsGOTOXV 33,1 

96 ?" MENU":POKE C,106:P0KE C+2, 0:POKE 
C+6,l:P0KE I; 4: UDISVS CI] 

100 RESTORE 10l:FOR UT=2 TO 18 : READ XZ 
$:GOTOXV 32,UT:?XZ$:NEXT UT 

101 DATA REUERSE, FILL.l, FILL. 2, ERASE, L 
INE.l, AIRBRUSH, MIRROR TEXT, 

113 DATA CIRCLE, BOX, ELLIPSE, LINE. 2, POL 
VGON, , CLEAR, EXIT 

114 GOTOXV 32, 19 : ?"LOAD/SAUE"; :POKE I, 
0:UDISVSC1) 

120 POKE C, 32: POKE C+2, 0: POKE C+6, UN 
KE 1,3: UDISVS CI) 

122 POKE C, 11: POKE C+2, 2: POKE C+6, 0:P0 
KE C + 10, l: COLOR 1,1,1,1,1 

191 POKE Z9, 257: GEMSVS C78) 

192 GEMSVS C79) :W=PEEKCg+2) :X=PEEKCg+4) 
194 IF M>540 AND U<629 AND X>74 AND X< 
388 THEN 199 ELSE 192 

199 GEMSVS C79) :M=PEEKCg+2) :X=PEEKCg+4) 



200 


IF 


X>363 


THEN 


Xl= 


363 


GOTO 


299 


201 


IF 


X>346 


THEN 


Xl= 


346 


GOTO 


299 


202 


IF 


X>329 


THEN 


Xl= 


329 


GOTO 


299 


203 


IF 


X>312 


THEN 


199 






204 


IF 


X>295 


THEN 


Xl= 


295 


GOTO 


299 


205 


IF 


X>278 


THEN 


Xl= 


278 


GOTO 


299 


206 


IF 


X>261 


THEN 


Xl= 


261 


GOTO 


299 


207 


IF 


X>244 


THEN 


Xl= 


244 


GOTO 


299 


208 


IF 


X>227 


THEN 


Xl= 


227 


GOTO 


299 


218 


IF 


X>210 


THEN 


199 








211 


IF 


X>193 


THEN 


Xl= 


193 


GOTO 


299 


212 


IF 


X>176 


THEN 


Xl= 


176 


GOTO 


299 


213 


IF 


X>159 


THEN 


Xl= 


159 


GOTO 


299 


214 


IF 


X>142 


THEN 


Xl= 


142 


GOTO 


299 


215 


IF 


X>125 


THEN 


Xl= 


125 


GOTO 


299 
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216 IF X>168 THEN X1=188:G0T0 299 

217 IF X>91 THEN X1=91:G0T0 299 

218 X1=74:G0T0 299 

258 POKE C, 11 : POKE C+2, 2: POKE C+6, 0:PO 
KE C+18,1 

255 POKE P, 8: POKE P+2, 37: POKE P+4, 530: 
POKE P+6, 383: UDISVS (1) 

256 POKE C, 32: POKE C+2, 8: POKE C+6, i:PO 
KE I, l:UDISYSCl) :GOTO 81 

299 POKE Z9, 256 : GEMSVS (78) :POKE P, 539: 
POKE P+2, XI: POKE P+6, Xl+17 
388 POKE P+4, 629:UDISVS(1) :LINEF 538, X 
1-38,538, Xl-38: POKE Z9, 257 : GEMSVS (78) 

381 GEMSVS(79) :W=PEEK(g+2) :X=PEEK(g+4) 
!IF PEEK(G+6)=1 THEN 384 

382 IF X>X1 AND X<X1+18 AND W>548 AND 
W<629 THEN GOTO 381 

383 POKE Z9, 256 ■" GEMSVS (78) : UDISVS (1) : L 
INEF 538, Xl-38, 538, Xl-38: GOTO 191 

384 C=CONTRL:I=INTIN:P=PTSIN:IF Xl=363 
THEN GOTO SAU 

385 IF Xl=74 THEN POKE Z9, 256 : GEMSVS (7 
8) : GOTO 258 

386 IF Xl=91 THEN GOSUB 338:?" FILL.l 
":GOTO FILLX 

387 IF Xl=188 THEN GOSUB 338:?" FILL. 
2":G0T0 FIL 

388 IF Xl=125 THEN GOSUB 338:?" ERASE 
":GOTO ERASEX 

309 IF Xl=142 THEN GOSUB 338:?" LINE. 
1":G0T0 LINEX 

318 IF Xl=159 THEN GOSUB 338:?" AIRBRU 
SH":GOTO AIRX 

311 IF Xi=176 THEN GOSUB 338:?" MIRRO 
R":GOTO MIRRORX 

312 IF Xl=193 THEN GOSUB 338:?" TEXT 
":GOTO TEXTX 

313 IF Xl=227 THEN GOSUB 338:?" CIRCL 
E" : GOTB CIRCLEX 

314 IF Xl=244 THEN GOSUB 338:?" BOX" 
:GOTO BOXX 

315 IF Xl=261 THEN GOSUB 338:?" ELLIPS 
E":GOTO ELLEX 

316 IF Xi=278 THEN GOSUB 338:?" LINE. 
2":GOT0 LINZ 

317 IF Xi=295 THEN GOSUB 338:?" POLVGO 
N":GOTO POLV 

318 IF Xl=329 THEN ZIPl=l:GOTO ALERT 

319 IF Xl=346 THEN ZIP1=2:G0T0 ALERT 
328 COLOR 8, 8, 8, 8,8:P0KE P,588:P0KE P+ 
2, 15IP8KE P+4, 515 

321 POKE P+6,28:UDISVS(1) :COLOR 1,1,1, 
1, l: RETURN 

323 CLEARX : POKE C, 32:P0KE C+2, 8:P0KE C 
+6,l:P0KE I, 1 : UDISVS (1) 

324 COLOR 1, 1, 1,8,8:P0KE C,ll:POKE C+2 
,2:P0KE C+6,8 

325 FOR BR=1 TO 172 STEP 1B:P0KE P, 171 
-BR : POKE P+2, 288-BR: POKE P+4, 359+BR 

326 POKE P+6, 212+BR : UDISVS (1) :NEXT BR: 
GOTO 81 

338 POKE C,32:P0KE C+2,8:P0KE C+6,1:P0 
KE 1,1: UDISVS (1) : POKE Z9, 256 

331 GEMSVS (78) : POKE I, 8 : UDISVS (1) : POKE 
C, 11 : POKE C+2, 2 : POKE C+6,8 

332 POKE C+18, l:POKE P, 508:P0KE P+2, 15 
:P0KE P+4, 515: POKE P+6, 28 : UDISVS (1) 

333 COLOR 1, 1, 1, 4, 2:F0R GI=8 TO 58 STE 
P 1B:P0KE P, 584-GI:P0KE P+2, 188-GI 

334 POKE P+4,586+GI:P0KE P+6, 346+GI : UD 
ISVS(1):NEXT GI:GOTOXV 32,1 

335 RESTORE 336:F0R VU=1 TO 4 : READ AA, 
BB,CC,DD,EE, FF:COLOR 1, 1, 1, EE, FF 

336 DATA 534,58,635,395,4,2,534,58,634 
, 394, 4, 2, 539, 55, 626, 72, 1, 1 

337 DATA 541,57,628,74,8,8 

338 POKE P,AA:POKE P+2,BB:P0KE P+4,CC: 
POKE P+6, DD : UDISVS (1) :NEXT VU : RETURN 



339 IF M>264 AND M<311 AND X>18 AND X< 
25 AND OG=l THEN CC9=1 : CA9=1 : GOTO 343 

341 IF W>364 AND W<411 AND X>18 AND X< 
25 AND OG=l THEN CC9=0 : CA9=0 : GOTO 343 

342 RETURN 

343 POKE C, 11: POKE C+2, 2 : POKE C+6,8: CO 
LOR 1,1, 1, CC9, CA9:P0KE P, 562-ZX1 

344 POKE P+2, 98+ZX2:P0KE P+4, 689-ZX1 : P 
OKE P+6,105+ZX2:UDISVS(1) : RETURN 

351 FILLX:RESTORE 358:F0R UV=8 TO 9:RE 
AD AA, BB, CC,DD,EE,FF:COLOR 1, 1, 1, EE, FF 
355 POKE P,AA:P0KE P+2, BB:P0KE P+4, CC: 
POKE P+6, DD : UDISVS (1) : NEXT UV 

358 DATA 538,88,629, 389,1, 1,548,82,631 
, 391, 8, 8, 545, 87, 626, 142, 1, 1, 545, 87 

359 DATA 624,148,4,2, 541, 147, 638,147,8 
, 8, 549, 91, 618, 134, 1, 1, 551, 93, 628, 136 
368 DATA 8,8, 543, 158,578, 168, 8, 8,572,1 
58, 599, 168, 1, 2, 681, 158, 628, 168, 2, 2 
362 U=3:B=2:FOR Z=170 TO 388 STEP 28:F 
OR V=543 TO 625 STEP 29 

364 COLOR 1, 1,1, U,B:U=U+1 : POKE P, VsPOK 
E P+2, Z: POKE P+4, V+27 

365 POKE P+6, Z+18:UDISVS(1) :IF U=25 TH 
EN U=l:B=3 

366 NEXT Z:NEXT V:I=4:G0SUB 328 

367 COLOR 1, 1,1, FF1,GFG: COLOR 1, 1, 1, FF 
1, GFG : POKE P, 553 

368 POKE P+2,95:P0KE P+4, 618:P0KE P+6, 
134:UDISVS(1) 

369 POKE Z9,257:GEMSVS(78) 

378 GEMSVS(79) :W=PEEK(G+2) :X=PEEK(G+4) 
:0G=PEEK(G+6) 

372 IF W>552 AND X<38 THEN 88 

373 IF U<538 AND X>37 AND X<383 AND OG 
=1 THEN 428 

374 IF OG=I AND U>541 AND M<627 AND X> 
147 THEN 408 

375 1=1: IF M<538 AND X>37 AND X<383 TH 
EN POKE Z9, 5: GEMSVS (78) :GOTO 370 

376 POKE Z9, 3:GEMSVS(78) :GOTO 378 
488 IF H<575 AND X<167 THEN LB=8:G0T0 
432 

481 IF W>575 AND X<167 THEN LB=8:G0T0 
431 

482 IF X<187 THEN LB=3:G0T0 431 

483 IF X<287 THEN LB=6:G0T0 431 

484 IF X<227 THEN LB=9:G0T0 431 
405 IF X<247 THEN LB=12:G0T8 431 

486 IF X<267 THEN LB=15:G0T0 431 

487 IF X<287 THEN LB=18:G0T0 431 

408 IF X<307 THEN LB=2l:G0T0 431 

409 IF W>575 AND X<327 THEN LB=8:G0T0 
438 

418 IF X<327 THEN LB=24:G0T0 431 

411 IF X<347 THEN LB=3:G0T0 438 

412 IF X<367 THEN LB=6:G0T0 430 

413 IF X<387 THEN LB=9:G0T0 438 ELSE 3 
78 

428 GEMSVS (79) :W=PEEK(g+2) :X=PEEK(g+4) 
:ZU=529:P0KE Z9, 256: GEMSVS (78) 

421 COLOR 1,1,1, 1,1: IF S1=W AND S2=X T 
HEN 369 

422 POKE P, 588: POKE P+2, 15: POKE P+4, 51 
5:P0KE P+6,26:UDISVS(1) : S1=M : S2=X : 1=3 
424 COLOR 1, 1,1, FF1, GFG: COLOR 1,1, 1,FF 
1, GFGiFILL M-l, X-38:LINEF ZU, 8, ZU, 344 
426 COLOR 8, 8,8,8, 8:UDISVS(1) :GOTO 369 
438 GFG=3:G0T0 448 

431 GFG=2:G0T0 448 

432 GFG=B:G0T0 448 

448 COLOR 1, 1, 1, FF1, GFG : GEMSVS (79) :W=P 
EEK (g+2) -541 : X=PEEK (g+4) : KF=W/29 

441 FF1=LB+KF: COLOR 1, 1, 1, FF1, GFG : DW=8 

442 POKE P,553:P0KE P+2,95:P0KE P+4, 61 
8:P0KE P+6,134:UDISVS(1) 

443 POKE P, 64: POKE P+2, 18: POKE P+4, 111 
: POKE P+6, 25:UDISVS(1) :GOTO 378 
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458 ERASEX '• RESTORE 451 1 HH=534 : THE=19 : G 
OSUB 806:ZXl=e:ZX2=8:GOSUB 328 

451 DATA 24,86,75,185,1,26,88,77,187,8 
, 6, 286, 91, 373, 1, 8, 288, 93, 375, 8, 18 

452 DATA 218,58,373,8,51,218,91,373,8, 
18, 258, 98, 251, 8, IB, 291, 98, 292, 8, 18, 332 

453 DATA 98,333,8,28,228,32,232,8,67,2 
26, 75, 234, 8, 24, 264, 36, 276, 8, 63, 262, 79 

454 DATA 278,8,28,382,48,322,8,59,388, 
83, 324, 8, 16, 339, 44, 367, 8, 55, 337, 87, 369 

455 DATA 8,26,131,72,175,1,28,133,74,1 
77,8 

456 COLOR 1,1,1, 8, 8: POKE P, 564 : POKE P+ 
2, 135 : POKE P+4, 606 : POKE P+6, 175 

457 UDISVS (1) : POKE P, 585-BO : POKE P+2, 1 
55-B0:P0KE P+4, 585+BO 

458 POKE P+6, 155+B0:UDISVSC1J :GOSUB 34 
3 

461 POKE Z9, 257: GEMSVS (78) 

462 GEHSVS (79) :W=PEEK(g+2) :X=PEEK(g+4) 
:8G=PEEK(G+6) 

465 IF W<538 AND X>37 AND X<383 AND OG 
=1 THEN GOTO 588 

466 IF W<538 AND X>37 AND X<383 THEN P 
OKE Z9, 7: GEHSVS (78) : GOTO 462 

467 IF W>552 AND X<38 THEN 88 

471 GOSUB 339: IF OG=l AND W>544 AND U< 
625 AND X>210 AND X<373 THEN 475 

472 POKE Z9, 3:GEMSVS(78) :GOTO 462 
475 GEMSVS(79) :W=PEEK (g+2) : X=PEEK (g+4) 



476 IF 


U>585 


AND 


X>333 


THEN 


B0=16:G0T0 


485 












477 IF 


W<585 


AND 


X>333 


THEN 


B0=14:G0T0 


485 












478 IF 


W>585 


AND 


X>292 


THEN 


B0=12:G0T0 


485 












479 IF 


U<584 


AND 


X>292 


THEN 


B0=18:G0T0 


485 












488 IF 


W>585 


AND 


X>251 


THEN 


BO=8:G0TO 


485 












481 IF 


W<584 


AND 


X>251 


THEN 


B0=6:G0T0 


485 












482 IF 


W>585 


AND 


X>218 


THEN 


B0=4:G0T0 


485 












483 IF 


W<584 


AND 


X>218 


THEN 


B0=2:G0T0 



485 ELSE 462 

485 COLOR 1,1, 1,8, 8: POKE P, 564:P0KE P+ 
2, 135:P0KE P+4, 686:P0KE P+6, 175 

486 UDISVS(l) :POKE P, 585-BO : POKE P+2, 1 
55-B0:P0KE P+4, 585+BO : POKE P+6, 155+BO 
488 UDISVS(l) :GOTO 462 

508 COLOR CC9, CC9, CC9, CC9, CC9 

581 GEMSYS(79) :W=PEEK(g+2) :X=PEEK(g+4) 

:IF PEEK(G+6)=8 THEN 462 

511 IF W<1+B0 THEN M=1+B0 

512 IF W>529-B0 THEN W=529-B0 

513 IF X<38+B0 THEN X=38+B0 

514 IF X>382-B0 THEN X=382-B0 

528 POKE P,M-B0:P0KE P+2, X-BO : POKE P+4 
,M+BO:POKE P+6, X+BO 

538 POKE Z9, 256 : GEMSVS (78) :UDISVS(1) :P 

OKE Z9, 257: GEMSVS (78) : GOTO 581 

688 LINEX : RESTORE 618 : HH=534 : THE=12 : GO 

SUB 888:ZX1=2:ZX2=12:G0SUB 328 

618 DATA 22,98,73,117,1,24,188,75,119, 

8, 7, 158, 89, 178, 1, 9, 152, 91, 188, 8, 7, 256 

611 DATA 89,348,1,9,258,91,358,8,11,26 

8, 89, 289, 8, 11, 298, 89, 319, 8, 11, 328, 89 

613 DATA 348,8,28,274,88,274,8,28,384, 
88, 385, 8, 28, 333, 88, 335, 1 

614 COLOR 1,1, 1,8, 8. 'POKE P,545:P0KE P+ 
2,154JP0KE P+4, 623:P0KE P+6, 178 

615 UDISVS(l) :COLOR 1, 1, 1, 1, 1 : POKE P, 5 
54: POKE P+2, 166-LO : POKE P+4, 614 

616 POKE P+6,166+L0:UDISVS(1) :GOSUB 34 
3 

628 POKE Z9, 257: GEHSVS (78) 

621 GEMSVS(79) :W=PEEK (g+2) : X=PEEK (g+4) 



:0G=PEEK(G+6) 

624 IF W>544 AND W<624 AND X>259 AND X 
<349 AND 0G=1 THEN 638 

625 IF W<538 AND X>37 AND X<383 AND OG 
=1 THEN GOTO 658 

626 IF W<530 AND X>37 AND X<383 THEN P 
OKE Z9, 5: GEMSVS (78) : GOTO 621 

627 IF W>552 AND X<38 THEN 88 

629 GOSUB 339:P0KE Z9, 3 : GEMSVS (78) ■■ GOT 
0 621 

638 GEMSVS(79) :X=PEEK(g+4) :IF X<349 TH 
EN L0=1 

638 IF X<319 THEN L0=8.5 

639 IF X<289 THEN LO=B 

648 COLOR 1,1, 1,8, 8: POKE P, 545:P0KE P+ 
2, 154:P0KE P+4,623:P0KE P+6, 178 

642 UDISVS(l) SCOLOR 1, 1, 1, 1, 1 : POKE P, 5 
54: POKE P+2, 166-LO : POKE P+4, 614 

643 POKE P+6,166+L0:UDISVS(1) :GOTO 621 

649 POKE Z9, 257: GEMSVS (78) : GOTO 621 
658 IF LO=B THEN POKE Z9, 256 : GEMSVS (78 
) :GOTO 668 

651 IF L0=8.5 THEN POKE Z9, 256: GEMSVS ( 
78) -GOTO 678 

652 IF L0=1 THEN POKE Z9, 256 : GEMSVS (78 
) :G0T0 688 ELSE 621 

668 V=M-1 : Z=X-38 : COLOR CC9, CC9, CC9 

661 GEMSVS (79) : W=PEEK (G+2) -1 : X=PEEK (G+ 
4)-38 

662 IF PEEK(G+6)=B THEN 649 

663 IF W>528 THEN 665 

664 LINEF U, X, V, Z: V=M:Z=X:GOTO 661 

665 LINEF 528, X, V, Z 

666 GEMSVS (79) : W=PEEK (G+2) -1 : X=PEEK (G+ 
4)-38:lF PEEK (G+6) -8 THEN 649 

668 IF W>528 THEN 666 ELSE V=528:Z=X:G 
OTO 661 

678 V=M-l:Z=X-38:CBLBR CC9, CC9, CC9 

671 GEMSVS (79) : W=PEEK (G+2) -1 : X=PEEK (G+ 
4)-38:IF PEEK(G+6)=8 THEN 649 

672 IF W>528 THEN W=528 

673 LINEF M, X, V, Z : LINEF M-l, X-l, V-l, Z- 
1 : LINEF M-1,X, V-1,Z:LINEF M,X-1,V,Z-1 

674 IF W=528 THEN GOTO 675 ELSE V=M:Z= 
X:GOTO 671 

675 GEMSVS (79) : W=PEEK (G+2) -1 : X=PEEK (G+ 
4)-38:IF PEEK (G+6)=8 THEN 649 

676 IF W>529 THEN 675 : V=528 : Z=X : GOTO 6 
71 

688 V=W-2 : Z=X-39 : COLOR CC9, CC9, CC9 

681 GEMSVS (79) : W=PEEK (G+2) -2 : X=PEEK (G+ 
41-39: IF PEEK(G+6)=8 THEN 649 

682 IF M>526 THEN W=526 

683 IF W<1 THEN W=-3 

684 LINEF N, X, V, Z : LINEF W+2, X+2, V+2, Z+ 
2 : LINEF W+2, X, V+2, Z 

685 LINEF W, X+2, V, Z+2 : LINEF W+l, X, V+l, 
Z : LINEF W+l, X+2, V+l, Z+2 

686 LINEF W, X+l, V, Z+l : LINEF W+2, X+i, V+ 
2, Z+l : LINEF W+l, X+l, V+l, Z+l 

687 IF W=526 THEN 688 ELSE V=W:Z=X:G8T 
0 681 

688 GEMSVS (79) : W=PEEK (G+2) -1 : X=PEEK (G+ 
4) -38: IF PEEK (G+6) =8 THEN 649 

689 IF W>527 THEN 688 : V=526 : Z=X : GOTO 6 
81 

781 AIRX:HH=534:REST0RE 784 : THE=2 : GOSU 
B 888: GOSUB 328 

784 DATA 22,98,73,117,1,24,188,75,119, 
8 

785 COLOR 1, 1, 1, CI, CI : POKE P, 568:P0KE 
P+2, 102SP0KE P+4, 687:P0KE P+6, 117 

786 UDISVS(l) :COLOR C2, C2, C2, C2, C2 : POK 
E P, 584:P0KE P+2, 163: POKE P+4, 686 

787 POKE P+6, 116:UDISVS(1) 
728 POKE Z9, 257 : GEMSVS (78) 

721 GEMSVS(79) :W=PEEK(g+2) :X=PEEK(g+4) 
:0G=PEEK(G+6) 



60 
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722 IF M>552 AND X<38 THEN 88 

725 IF W<538 AND X>37 AND X<383 AND OG 
=1 THEN GOTO 735 

726 IF M<530 AND X>37 AND X<383 THEN P 
OKE Z9,5:GEMSVS(78) :GOTO 721 

727 IF W>164 AND W<211 AND X>18 AND X< 
25 AND OG=l THEN Cl=8 : C2=l : GOTO 731 

728 IF M>264 AND M<311 AND X>18 AND X< 
25 AND OG=l THEN Cl=l : C2=l : GOTO 731 

729 IF W>364 AND W<411 AND X>18 AND X< 
25 AND OG=l THEN Cl=8 : C2=8 : GOTO 731 
738 POKE Z9, 3:GEMSYS(78) :GOTO 721 

731 COLOR 1, 1, 1, CI, CI : POKE P, 560:POKE 
P+2, 182JP0KE P+4, 687:P0KE P+6, 117 

732 UDISVS(l) :C0LOR C2, C2, C2, C2, C2 : POK 
E P, 584:P0KE P+2, 183:P0KE P+4, 606 

734 POKE P+6,116:UDISVSC1) :G0T0 721 

735 GEMSVS (79) :M=PEEK (G+2) -6 ! X=PEEK (G+ 
4)-43:Zl=RND*10 

736 IF PEEK(G+6)=8 THEN 721 

737 IF W>519 THEN M=519 

738 Z2=RND*18 : Z3=RND*18 : Z4=RND*18 : Z5=R 
NDW18: COLOR CI, CI, CI : POKE Z9, 256 

739 GEMSVS (78) : LINEF Zl+W, Z2+X, Zl+W, Z2 
+X:LINEF Z5+M, Zl+X, Z5+M, Zl+X 

748 LINEF Z2+M, Z5+X, Z2+M, Z5+X ! COLOR C2 
,C2,C2: LINEF Z3+M, Z4+X, Z3+W, Z4+X 

741 LINEF Z4+M, Z2+X, Z4+N, Z2+X : LINEF Z5 
+M, Z3+X, Z5+M, Z3+X : POKE Z9, 257 

742 GEMSVS (78) :GOTO 735 

758 MIRRORX: RESTORE 751 : HH=534 : THE=13 : 
GOSUB 808:ZX1=2:ZX2=12:GOSUB 320 

751 DATA 22,98,73,117,1,24,188,75,119, 
8, 13, 136, 83, 188, 1, 15, 138, 85, 198, 8, 13 

752 DATA 222,83,378,1,15,224,85,388,8, 
17, 277, 83, 327, 8, 17, 226, 83, 275, 8, 17, 329 

753 DATA 83,378,8,58,226,58,275,8,17,3 
82, 83, 382, 8, 17, 354, 83, 354, 8, 58, 329, 58 

754 DATA 378,8 

755 COLOR 1,1, 1,8, 8 :POKE P, 551: POKE p+ 
2,148:P0KE P+4,617:P0KE P+6, 188 

756 UDISVS (1) : LINEF 558+LX, 182, 558+LX, 
158 : LINEF 558, 182+LV, 616, 1B2+LV 

757 GOSUB 343 

758 POKE Z9, 257: GEMSVS (78) 

759 GEMSVS(79) :W=PEEK(g+2) :X=PEEK(g+4) 
:0G=PEEK(G+6) 

762 IF M>551 AND W<619 AND X>224 AND X 
<388 AND 0G=1 THEN 775 

763 IF M<530 AND X>37 AND X<383 AND OG 
=1 THEN GOTO 784 

764 IF W<536 AND X>37 AND X<383 THEN P 
OKE Z9, 5 : GEMSVS (78) : GOTO 759 

765 IF W>552 AND X<38 THEN 88 

767 GOSUB 339:P0KE Z9, 3 :GEMSVS (78) ! GOT 
0 759 

775 GEMSVS(79) :X=PEEK(G+4) 

776 IF X<276 THEN 788 

777 IF X<328 THEN 779 

778 LX=33 : LV=24 i Ui=8 ! W2=8 : X3=8 : X2=0 : GO 
TO 781 

779 LX=0 : LV=24 :W1=8 S W2=648 I X3=4QB I X2=0 
:GOTO 781 

788 LX=33 : LV=8 :M1=648 :M2=B ! X3=8 : X2=4O0 

781 COLOR 1,1, 1,8, 8 SPOKE P,551:P0KE P + 
2, 148:P0KE P+4,617:P0KE P+6, 188 

782 UDISVS (1) sLINEF 558+LX, 182, 558+LX, 
158s LINEF 55B, 182+LV, 616, 182+LV 

783 GOTO 759 

784 P8KE Z9, 256: GEMSVS (78) :V=M-l:Z=X-3 
8: COLOR CC9, CC9, CC9 

785 GEMSVS (79) :W=PEEK (G+2) -1 : X=PEEK (G+ 
4) -38 .'IF PEEK(G+6)=8 THEN 758 

786 IF M>528 THEN M=528 

787 LINEF 527-M+M2, X, 527-V+W2, Z : LINEF 
527-M+M1, 344-X+X3, 527-V+M1, 344-Z+X3 

788 LINEF W, X, V, Z ! LINEF M-Wl, 344-X+X2, 
V-M1,344-Z-X2:V=M:Z=X 



789 IF W=528 THEN 792 

798 IF W<1 THEN 794 ELSE 785 

792 GEMSVS (79) :W=PEEK (G+2) -1 : Z=PEEK (G+ 
4)-38:lF W<528 THEN 785 

793 IF PEEK(G+6)=B THEN 758 ELSE 792 

794 GEMSVS (79) :W=PEEK (G+2) -1 : Z=PEEK (G+ 
4)-38:IF H>1 THEN 785 

795 IF PEEK(G+6)=8 THEN 758 ELSE 794 

798 RESTORE 882 : HH=534 : G8T0 8BB 

799 RESTORE 885:HH=534 

88B FOR G0Z=1 TO THE : READ AA, BB, CC, DD, 
EE:COLOR 1, 1, 1, EE, EE : POKE P, AA+HH 

881 POKE P+2, BB:POKE P+4, CC+HH : POKE P+ 
6, DD:UDISVS(1) :NEXT GOZ:RETURN 

882 DATA 5,326,85,388,1,7,328,87,382,8 
, 7, 346, 87, 363, 8, 5, 275, 74, 312, 1, 7, 277 

883 DATA 76,314,8,7,295,77,295,8,5,287 
, 66, 268, 1, 7, 289, 68, 262, 8, 7, 227, 68, 244 

884 DATA 8 

885 DATA 5, 145, 46, 176, 1,7,147, 48, 178,8 
, 53, 145, 92, 176, 1, 55, 147, 94, 178, 0, 25, 89 

886 DATA 74,138,1,27,91,76,132,8,5,326 
, 85, 388, 1, 7, 328, 87, 382, 8, 7, 346, 87, 363 

887 DATA 8,5,258,75,312,1,7,268,77,314 
, 8, 7, 278, 77, 295, 8, 5, 198, 67, 244, 1, 7, 192 

888 DATA 69,246,8,7,218,69,227,8,12,15 
2, 43, 173, 8, 68, 152, 89, 173, 1, 32, 96, 71 

889 DATA 127, 8, 36,188, 67, 123,8 

813 CI RCLEX : V=8 : Z=38 : BG=8 : TH=8 : THE=15 : 
GOSUB 798:G0SUB 320:COLOR 1,1,1,8,8 

814 PBKE C, ll:POKE C+2, 3:P0KE C+6,8:PB 
KE C+18, 4:P0KE P, 561:P0KE P+2, 162 

815 POKE P+8, 18:UDISVS(1) :C0LOR 1,1,1, 
l,l:POKE P, 688 : UDISVS (1) : RESTORE 817 

816 FOR IU=i TO 8 : READ AA, B$ : GOTOXV 32 
, AA : ?BS# : NEXT IUiGOTO 821 

817 DATA 18, PLOT, 11, X 8, 12, V 8, 14, RADI 
US,15,Z 8, 17, MOUSE PBS, 18, X 8, 19, V 8 
828 POKE Z9, 256: GEMSVS (78) 

821 COLOR 1,1,1, TH,TH:POKE P, 585:P0KE 
P+2, llliPOKE P+8, 16:UDISVS(1) 

822 POKE P+8, 18:UDISVS(1) :Cl=l:C2=l 
825 POKE Z9, 257: GEMSVS (78) 

828 GEMSVS (79) :W=PEEK (g+2) : X=PEEK (g+4) 
:0G=PEEK(G+6) 

829 IF M<538 AND X>36 AND X<384 AND OG 
=2 THEN 845 

838 IF U<538 AND X>36 AND X<384 AND OG 
=1 THEN 839 

831 IF W<538 AND X>37 AND X<383 THEN P 
OKE Z9, 5:G0T0 837 

834 IF W>552 AND X<38 THEN 80 

835 IF 0G=1 THEN 875 

836 POKE Z9, 3: GEMSVS (78) : GOTO 828 

837 GEMSVS (78) : GOTOXV 32, 18 : ? ,, X"M-l n " 
:GOTOXV 32, 19 : ?"V"X-38" "; 

838 GOTOXV 32, 15 : ?"Z"W-BG-l n ":GOTO 82 
8 

839 POKE Z9, 256 : GEMSVS (78) :G8T0XV 32,1 
l:?"X"M-l GOTOXV 32, 12 

848 ?"VX-38 LINEF H-l, X-38, W-l, X-3 

8:BG=W-l:V=M:Z=X:G0T0 825 

845 POKE Z9, 256: GEMSVS (78) : IF BG+BG-W> 
527 THEN 825 

846 IF TH=1 THEN 869 

847 CIRCLE V-l, Z-38, W-V : GOTO 825 
869 IF BG+BG-W<-1 THEN 825 

878 IF BG-W+Z<37 THEN 825 

871 IF BG-W>8 THEN 825 

872 IF BG-W-Z<-383 THEN 825 

874 POKE P, Y:POKE P+2, Z:POKE P+8,M-V:U 
DISVS(l) : GOTO 825 

875 IF U>589 AND X>151 AND X<182 AND U 
<628 THEN TH=1:G0T0 828 

876 IF M>543 AND X>151 AND X<182 AND U 
<682 THEN TH-0 : GOTO 828 

877 IF TH=B THEN 828 

878 GOSUB 888: GOTO 884 
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880 IF W>64 AND W<111 AND JO 18 AND X<2 
5 THEN Cl=FFl:C2=GFG 

881 IF W>264 AND W<311 AND X>10 AND X< 
25 THEN Cl-1 ' C2=l 

882 IF W>364 AND W<411 AND X>18 AND X< 
25 THEN C1=8:C2=8 

883 COLOR 1,1, 1, CI, C2: COLOR 1, 1, 1, CI, C 
2 -'RETURN 

884 POKE P, 585 '• POKE P+2, 111: POKE P+8, 1 
6:UDISVStl) :GOTO 828 

985 BOXX : V=8 : Z=8 : BG=8 : BE=38 : TH=8 : THE=1 
9:G0SUB 799:G0SUB 328 : Cl=l : C2=l 

986 RESTORE 987:F0R IU=i TO 9 : READ AA, 
BSsGOTOXY 32, AA:?B$; :NEXT IU:GOTO 911 

987 DATA 9, PLOT, 18, X 8, 11, V 8, 13, SIZE, 
14, X B,15,V 8, 17, MOUSE POS, 18, X, 19, V 
918 POKE Z9, 256: GEMS VS (78) 

911 COLOR 1,1,1, TH,TH SPOKE P, 566 : POKE 
P+2, 96 :POKE P+4, 685JP0KE P+6, 127 

912 UDISYS(l) SPOKE P, 578:P0KE P+2, 188: 
POKE P+4, 68BSP0KE P+6, 123 : UDISVS (1J 
915 POKE Z9, 257: GEMSYS (78) 

918 GEMSVS (791 :W=PEEK Cg + 2) : X=PEEK (g+4) 
:0G=PEEK(G+6) 

919 IF W<538 AND X>36 AND X<384 AND OG 
=2 THEN 931 

928 IF W<538 AND X>36 AND X<384 AND OG 
=1 THEN 929 

921 IF W<538 AND X>37 AND X<383 THEN P 
OKE Z9,5:G0T0 927 

924 IF W>552 AND X<38 THEN 88 

925 IF 0G=1 THEN 948 

926 POKE Z9, 3: GEMSYS (78) : GOTO 918 

927 GEMSVS (78) SGOTOXV 32, 18 s ?"X ,, W-i" " 
SGOTOXV 32,19!? ,, V , X-38" "; 

928 GOTOXV 32, 14 : ?"X"M-BG-1 GOTOXV 

32,15:?"V"X-BE GOTO 918 

929 POKE Z9,256:GEMSVS(78) SGOTOXV 32,1 
8:?"X"N-1 GOTOXV 32,11 

938 ?"V"X-38 LIHEF W-l, X-38, M-l, X-3 

8 : BG=W-1 : BE=X : Y=W-1 s Z=X-38 : GOTO 915 
931 POKE Z9,256:GEMSYS(78) :IF TH=1 THE 
N 935 

933 LIHEF V, Z, W-l, ZsLINEF V, Z, V, X-38 

934 LINEF V, X-38, W-l, X-38 : LINEF W-l, Z, 
W-l, X-38: GOTO 915 

935 POKE P, V+l : POKE P+2, Z+38 : POKE P+4, 
W:POKE P+6,X:UDISVS(1) :GOTO 915 

948 IF W>589 AND X>147 AND X<178 AND W 
<628 THEN TH=1:G0T0 918 

942 IF W>543 AND X>147 AND X<178 AND W 
<682 THEN TH-0 : GOTO 918 

943 IF TH=B THEN 918 
945 GOSUB 888 

948 POKE P, 566SP0KE P+2, 96:P0KE P+4, 68 
5:P0KE P+6, 127 : UDISVS (1) :GOTO 918 
958 ELLEX : V=8 : Z=8 : BG=8 : BE=38 : TH=8 : THE= 
15: GOSUB 799: GOSUB 328: COLOR 1,1,1,8,8 

953 RESTORE 954:F0R IU=1 TO 9 : READ AA, 
B$ : GOTOXY 32, AA : ?B$; : NEXT IU:POKE C, 11 

954 DATA 9, PLOT, 18, X 8, 11, V 8, 13, RADIU 
S, 14, X 8, 15, V 8, 17, MOUSE POS, 18, X, 19, Y 

955 POKE C+2, 2: POKE C+6, 8: POKE C+18, 5: 
POKE P,561:P0KE P+2,162:P0KE P+4, 14 

956 POKE P+6, 18:UDISVS(1) iCOLOR 1,1,1, 
l,l:POKE P,688:UDISYS(1) :GOTO 961 

968 POKE Z9, 256 : GEMSYS (78) 

961 COLOR 1,1,1, TH, TH: POKE P, 585 : POKE 
P+2,lll:P0KE P+4, 18 : POKE P+6, 14 

962 UDISYS(i) SPOKE P+4, 14:P0KE P+6, 18: 
VDISYS(l) sCl=l:C2=l 

965 POKE Z9, 257: GEMSVS (78) 

968 GEMSVS (79) :W=PEEK(g+2) :X=PEEK(g+4) 
:0G=PEEK(G+6) 

969 IF W<538 AND X>36 AND X<384 AND OG 
=2 THEN 981 

978 IF W<538 AND X>36 AND X<384 AND OG 
=1 THEN 979 



971 IF W<538 AND X>37 AND X<383 THEN P 
OKE Z9,5:G0T0 977 

974 IF W>552 AND X<38 THEN 88 

975 IF 0G=1 THEN 998 

976 POKE Z9, 3:GEMSYS(78) :GOTO 968 

977 GEMSYS (78) SGOTOXV 32, 18 : ?"X"W-1" " 
SGOTOXV 32, 19:?"Y"X-38" 

978 GOTOXV 32, 14 : ? ,, X"W-BG-1" ":GOTOXY 
32, iS^'^'X-BE" ".•GOTO 968 

979 POKE Z9, 256: GEMSYS (78) : GOTOXV 32,1 
B:?"X"W-1 GOTOXV 32,11 

988 ? ,, Y ,, X-38" ":LINEF W-l, X-38, W-l, X-3 
8 : BG=W-1 : BE=X : V=W-1 : Z=X-38 : GOTO 965 

981 POKE Z9, 256: GEMSVS (78) : IF TH=1 THE 
N 983 

982 IF BG+BG-W>528 THEN 965 ELSE ELLIP 
SE V, Z,W-V, X-Z-38SG0T0 965 

983 IF BG+BG-W<-1 THEN 965 

984 IF BE-X+Z<-1 THEN 965 

985 IF BG-W>8 THEN 965 

986 IF BE-X+Z>344 THEN 965 

988 POKE P, V+l SPOKE P+2, Z+38 : POKE P+4, 
W-V-l:POKE P+6, X-Z-38 : UDISYS (1) 

989 GOTO 965 

998 IF W>589 AND X>147 AND X<178 AND W 
<628 THEN TH=1:G0T0 968 

992 IF W>543 AND X>147 AND X<178 AND W 
<682 THEN TH=8:G0T0 968 

993 IF TH=8 THEN 968 ELSE GOSUB 888 

994 POKE P,585:P0KE P+2, 111:P0KE P+4, 1 
8:P0KE P+6,14:UDISVS(1) :GOTO 968 

996 DATA 538,88,629,249,1,1,548,82,631 
, 251, 8, 8, 545, 87, 626, 142, 1, 1, 545, 87, 624 

997 DATA 148,4,2,541,147,638,147,8,8,5 
49, 91, 618, 134, 1, 1, 551, 93, 628, 136, 8, 8 
1888 LINZ:V=8:Z=8:THE=13:HH=534:REST0R 
E 1885:G0SUB 888:G0SUB 328 : BG=8 : BE=38 

1885 DATA 5,326,85,388,1,7,328,87,382, 
8, 7, 346, 87, 363, 8, 5, 258, 75, 312, 1, 7, 268 

1886 DATA 77,314,8,7,278,77,295,8,5,19 
8, 67, 244, 1, 7, 192, 69, 246, 8, 7, 218, 69, 227 

1887 DATA 8,22,98,73,117,1,24,188,75,1 
19, 8, 11, 148, 87, 158, 1, 13, 142, 89, 168, 8 

1888 GBTOXV 33, 6:?"P D" : LINEF 556,1 
28,573,12B:LINEF 585,185,585,122 

1889 FBR IU=1 TO 9 s READ AA,B$sGOTOXY 3 
2, AA:?B$; sNEXT IU:ZX1=2:ZX2=12:LPL=2 

1818 DATA 9, PLOT, 18, X 8, 11, V 8, 13, DRAW 
,14,X 8, 15, V 8, 17, MOUSE POS, 18, X, 19, V 
1811 L8=556: GOSUB 343 

1815 POKE Z9,257:GEMSVS(78) SCOLOR 1,1, 
1 

1816 GEMSVS (79) s W=PEEK (g+2) s X=PEEK (g+4 
) :0G=PEEK(G+6) 

1817 IF W<538 AND X>36 AND X<384 AND 8 
G=2 THEN 1868 

1819 IF W<538 AND X>36 AND X<384 AND 8 
G=l THEN 1829 

1828 IF W>547 AND W<623 AND X>142 AND 

X<168 AND 0G=1 THEN 1858 

1021 IF W<538 AND X>37 AND X<383 THEN 

POKE Z9, 7:G0T0 1827 

1622 IF W>552 AND X<38 THEN 88 

1826 GOSUB 339:P0KE Z9, 3: GEMSVS (78) : GO 
TO 1816 

1827 GEMSVS (78) : GOTOXY 32, 18 : ?"X"W-1" 
"JGOTOXY 32, ^^■•VX-SS" "S 

1828 GOTOXV 32, 14 : ?"X"W-BG-1 GOTOXV 

32,15:?"V"X-BE GOTO 1816 

1829 POKE Z9, 256: GEMSVS (78) 

1038 COLOR 1,1,1 SGOTOXV 32, IB : ?"X"W-1" 
" : GOTOXV 32, 11 : ?"V"X-38 BG=W-1 

1831 COLOR CC9, CC9, CC9:LINEF W-l, X-38, 
W-l, X-38 : BE=X : V=W-1 s Z=X-38 s GOTO 1815 

1832 POKE Z9, 256 ."GEMSYS (78) : COLOR CC9, 
CC9, CC9 : LINEF W-l, X-38, V, Z : RETURN 
1858 POKE Z9, 256 : GEMSYS (78) :IF W<586 T 
HEN L8=556:L9=595 
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1851 COLOR 8,8, 8: IF W>586 THEN L8=595: 
L9=556 

1852 LIHEF L9, 128, L9+17, 128 : COLOR 1,1, 
1 : LINEF L8,128,L8+17,128:G0T0 1815 
1868 IF L8=595 THEN GOSUB 1832:G0T0 18 
30 ELSE GOSUB 1832:G0T0 1815 

1099 FIL : RESTORE 996:F0R UV=1 TO 7 : REA 
D A A, BB, CC, DD, EE, FF : COLOR 1, 1, 1, EE, FF 

1100 POKE P, AASPOKE P+2,BB:P0KE P+4, CC 
JPOKE P+6,DD:UDISVS(1) :NEXT UV 

1101 RESTORE 1160:F0R Z=158 TO 233 STE 
P 20-.FOR V=543 TO 625 STEP 29 

1102 POKE C,112:P0KE C+2,0:POKE C+4,0: 
POKE C+6, 16:P0KE C+8, 0:POKE P, 8 

1103 POKE P+2,8:P0KE P+4,8:P0KE P+6,B: 
POKE P+8,0:FOR 11=8 TO 15 : READ LA 

1104 POKE INTIH+II*2,LA:NEXT:UDISVS(1) 
:POKE C, 23:P0KE C+2, 8:P0KE C+4, 8 

1105 POKE C+6, l:POKE C+8, 2:P0KE C, il:P 
OKE C+2,2:P0KE C+6, 0:POKE C+10, 1 

1106 COLOR 1, 1,1,4, 4:P0KE P,V:POKE P+2 
,Z:POKE P+4, V+27: POKE P+6, Z+18 

1107 UDISYS(l) :HEXT Z:NEXT Y:GOSUB 328 
:IF DU>0 THEN GOTO 2128 

1188 COLOR 1,1,1, FF1,GFG: POKE P, 553 

1189 COLOR 1, 1,1, FF1,GFG: POKE P+2, 95:P 
OKE P+4, 618SP0KE P+6, 134 : UDISYS(i) 

1111 POKE Z9, 257: GEMSVS (78) 

1112 GEMSVS (79) : W=PEEK (G+2) : X=PEEK CG+4 
) :0G=PEEK(G+6) 

1113 IF W>552 AND X<38 THEN 88 

1114 IF W<538 AND X>37 AND X<383 AND 0 
G=I THEN 1148 

1115 IF OG=I AND W>541 AND W<627 AND X 
>147 AND X<247 THEN 1128 

1116 1=1: IF M<538 AND X>37 AND X<383 T 
HEN POKE Z9, 5: GEMSVS (78) : GOTO 1112 
1118 POKE Z9, 3: GEMSVS (78) : GOTO 1112 

1120 IF M>601 AND X>227 THEN DU=i : REST 
ORE 1188: GOTO 1158 

1121 IF M>572 AND X>227 THEN DU=2 : REST 
ORE 1186:G0T0 1158 

1122 IF M>543 AND X>227 THEN DW=3:REST 
ORE 1184:G0T0 1158 

1123 IF W>681 AND X>287 THEN DW=4:REST 
ORE 1182: GOTO 1158 

1124 IF M>572 AND X>287 THEN DW=5:REST 
ORE 1188:G0T0 1150 

1125 IF M>543 AND X>207 THEN DW=6:REST 
ORE 1178:G0T0 1158 

1126 IF W>681 AND X>187 THEN DW=7:REST 
ORE 1176:G0TO 1150 

1127 IF W>572 AND X>187 THEN DW=8:REST 
ORE 1174:G0TO 1150 

1128 IF W>543 AND X>187 THEN DW=9 : REST 
ORE 1172: GOTO 1158 

1129 IF W>681 AND X>167 THEN DW=18:RES 
TORE 1170:G0T0 1150 

1130 IF M>572 AND X>167 THEN D^=11:RES 
TORE 1168:G0T0 1158 

1131 IF W>543 AND X>167 THEN DW=12:RES 
TORE 1166:G0T0 1158 

1132 IF W>601 AND X>147 THEN DW=13:RES 
TORE 1164:G0T0 1158 

1133 IF M>572 AND X>147 THEN DW=14:RES 
TORE 1162: GOTO 1158 

1134 IF M>543 AND X>147 THEN DW=15:RES 
TORE 1168 '.GOTO 1150 

1135 GOTO 1112 

1140 GEMSVS (79) :W=PEEK (g+2) : X=PEEK (g+4 
) :ZV=529:P0KE Z9, 256 : GEMSVS (78) 

1141 COLOR 1,1,1, 1,1: IF S1=W AND S2=X 
THEN 1111 

1142 POKE P,508:P0KE P+2,15:P0KE P+4, 5 
15: POKE P+6,20:UDISVS(1) : S1=N : S2=X : 1=3 

1143 COLOR 1,1,1, FF1,GFG:C0L0R 1, 1, 1, F 
Fl, GFGsFILL U-l, X-38 •' LINEF ZU, 8, ZU, 344 

1144 COLOR 0, 0, 0, 0, 8 : UDISVS (1) : GOTO 11 



11 

1150 GFG=4:P0KE C, 112 : POKE C+2, 0 : POKE 
C+4,0:PBKE C+6, 16: POKE C+8, 8: POKE P, 8 

1151 POKE P+2, 8 : POKE P+4,8:P0KE P+6, O: 
POKE P+8,8:F0R 11=0 TO 15 : READ LA 

1152 POKE INTIN+II*2, LA:NEXT:UDISVS(1) 
:POKE C, 23:P0KE C+2, 0:POKE C+4, 8 

1153 POKE C+6,l:P0KE C+8,2:P0KE C,11:P 
OKE C+2, 2:P0KE C+6,0:POKE C+10, 1 

1154 COLOR 1, 1,1, 4,4:P0KE P, 553:P0KE P 
+2,95:P0KE P+4,618:P0KE P+6, 134 

1155 UDISVS(l) :POKE P, 64:P0KE P+2, 10:P 
OKE P+4,lll:P0KE P+6, 25: UDISVS (1) 

1156 GOTO 1112 

1160 DATA 64639,1344,2336,2720,4752,52 
00, 9288, 10280, 18468, 28500, 36882, 48978 

1161 DATA 8281,16389,32764,8 

1162 DATA 1888,2336,4752,9288,18468,36 
882, 8201, 16388, 32778, 16388, 8281, 36882 

1163 DATA 18468,9288,4752,2336 

1164 DATA 8,65534,32778,32778,32778,32 
770, 32770, 32770, 32770, 32770, 32770 

1165 DATA 32770,32770,32770,32770,6553 
4 

1166 DATA 0, 8176, 4112, 8288,8288, 16388, 
16388, 32778, 32778, 32778, 16388, 16388 

1167 DATA 8288,8288,4112,8176 

1168 DATA 18923,13655,18923,16383,1638 
3, 8, 8, 16383, 10923, 13655, 10923, 13655 

1169 DATA 10923,13655,10923,13655 

1170 DATA 8195,16383,8195,16383,16383, 
0, 0, 16383, 8195, 16383, 8195, 16383, 8195 

1171 DATA 16383,8195,16383 

1172 DATA 8,65535,8,65535,0,65535,0,65 
535, O, 65535, 8, 65535, 0, 65535, O, 65535 

1174 DATA 21845,21845,21845,21845,2184 
5, 21845, 21845, 21845, 21845, 21845 

1175 DATA 21845,21845,21845,21845,2184 
5,21845 

1176 DATA 44138,22837,45978,26573,5322 
2, 48947, 16377, 32764, 65534, 32764 

1177 DATA 16377,48947,53222,26573,4597 
8 22837 

1178 DATA 65534,32771,1,1,1,1,1,1,1,1, 
1,1,1,1,1,32771 

1180 DATA 3,3,3,3,3,3,65535,65535,384, 
384, 384, 384, 384, 384, 65535, 65535 

1182 DATA 43176,38869,43698,21845,3546 
6, 22359, 43698, 21845, 43176, 38869 

1183 DATA 43698,21845,35466,22359,4369 
8, 21845 

1184 DATA 128,128,448,448,992,992,2832 
, 2032, 4088, 4088, 8188, 8188, 16382, 16382 

1185 DATA 32767,32767 

1186 DATA 15567,14535,14535,12483,8385 
, 8, 8, 8, 720, 720, 720, 720, 1752, 1752, 3804 

1187 DATA 7374 

1188 DATA 16375,16135,16135,16263,1626 
1, 7943, 8, 8, 2846, 4895, 8191, 15367, 14343 

1189 DATA 15367,16375,16383 

1200 POLV : V=8 : Z=0 : THE=13 : HH=534 : RESTOR 
E 1202:G0SUB 88B:G0SUB 320 : BG=0 : BE=38 

1202 DATA 5,326,85,388,1,7,328,87,382, 
8, 7, 346, 87, 363, 8, 5, 258, 75, 312, 1, 7, 260 

1203 DATA 77,314,8,7,278,77,295,0,5,19 
0, 67, 244, 1, 7, 192, 69, 246, 0, 7, 210, 69, 227 

1204 DATA 0,22,98,73,117,1,24,188,75,1 
19, 0, 5, 139, 88, 176, 1, 7, 141, 82, 178, 8 

1205 BZ=0:GOTOXV 32,7:?" 0":GOTOXY 3 
2,6:?" LINE NO" : LINEF 540,121,620, 121 

1206 NC=4:F0R IU=1 TO 9 : READ AA, B5 : GOT 
OXV 32, AA:?B$; :HEXT IU:LPL=2 

1207 DATA 9, PLOT, 10, X 0, 11, V O, 13, DRAW 
,14,X 0,15,V 0,17, MOUSE POS, 18, X, 19, V 

1208 POKE P, UPOKE P+2, 38 : HT1=1 : HT2=38 

1209 POKE C,ll:POKE C+2,2:P0KE C+6,0:C 
OLOR 1, 1, 1, CC9, CA9JP0KE P, 560 

1210 POKE P+2, 102:P0KE P+4,607:P0KE P+ 
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6, 117SC0L0R 1, 1, 1, CC9, CA9 : UDISVS (1) 
1211 POKE C, 32:P0KE C+2, 0:POKE C+6,i:P 
OKE 1,1: UDISYS (1) 

1215 POKE Z9,257:GEMSVS(78) :COLOR 1,1, 

1216 GEMSVS (79) :M=PEEK(g+2) :X=PEEK(g+4 
) :0G=PEEK(G+6) 

1217 IF W<530 AND X>36 AND X<384 AND 0 
G=2 THEN 1277 

1219 IF M<538 AND X>36 AND X<384 AND 0 
G=l THEN 1278 

1221 IF M<530 AND X>37 AND X<383 THEN 
POKE Z9, 256:GEMSVS(78) :GOTO 1238 

1222 IF W>552 AND X<38 THEN POKE I,1:U 
DISVS(l) :GOTO 88 

1223 IF OG=l THEN 1260 

1224 POKE Z9, 3 : GEMSVS C78) : GOTO 1216 
1238 POKE I,3:UDISVS(i) :COLOR 1, 1, 1, CC 
9 CA9 

1232 GEMSVS C79J :W=PEEK(g+2) :X=PEEK(g+4 
):IF PEEK(g+6)>0 THEN 1211 

1233 IF NT=M AND XR=X THEN GOTO 1258 

1234 LINEF M-l, X-38, V, Z : IF W>538 THEN 
1248 

1237 IF X<36 THEN 1248 

1238 IF X>383 THEN 1248 

1239 NT=W:XR=X: LINEF M-l, X-38, V, Z : GOTO 
1232 

1248 LINEF M-l, X-38, V, Z : GOTO 1211 
1258 LINEF M-l, X-38, V, Z : POKE I,1:UDISV 
S(1):C0L0R 1,1, HGOTOXV 32,18 

1251 ?"X"M-1" "iGOTOXV 32, 19 : ? ,, V"X-38" 
"; 

1252 GOTOXV 32, 14 : ? ,, X"M-BG-1 GOTOXV 

32, 15 : ? ,, V"X-BE POKE I, 3 : UDISVS (1) 

1253 GEMSVS (79) : U=PEEK (g+2) : H=PEEK (g+4 
):IF PEEK(G+6)>8 THEN 1239 

1254 IF NT=U AND XR=H THEN 1253 ELSE 1 
239 

1255 GOTO 1239 

1268 IF M>568 AND M<687 AND X>182 AND 
X<117 THEN POKE Z9, 256:G0T0 1285 

1261 IF M>64 AND M<111 AND X>18 AND X< 
25 THEN CC9=FFl:CA9=GFG:G0T0 1265 

1262 IF M>264 AND M<311 AND X>18 AND X 
<25 THEN CC9=l:CA9=l:G0T0 1265 

1263 IF M>364 AND M<411 AND X>18 AND X 
<25 THEN CC9=0:CA9=0:GOTO 1265 ELSE 12 
24 

1265 POKE C, 11: POKE C+2, 2: POKE C+6,0:C 
OLOR 1,1,1, CC9,CA9: POKE P, 568 

1266 POKE P+2, 182:P0KE P+4, 687:P0KE P+ 
6, 117 : COLOR 1, 1, 1, CC9, CA9 : UDISVS CI) 

1267 POKE C, 32:P0KE C+2, 8:P0KE C+6,1:P 
OKE 1, 1 : UDISVS tl) 

1268 POKE P, HT1 : POKE P+2, HT2:P0KE P+4, 
HT3 : POKE P+6,HT4:G0T0 1224 

1278 BZ=8 : NC=8 : GOTOXV 32,7:?" ";BZ:PO 
KE Z9, 256 : GEMSVS (78) 

1272 COLOR 1,1,1 : GOTOXV 32, IB : ?"X"M-1" 
"SG0T8XV 32, ll:?"V"X-38" " 

1273 COLOR CC9, CC9,CC9: LINEF M-l, X-38, 
M-l, X-38 : BG=M-1 : BE=X : V=M-1 : Z=X-38 

1274 HT1=M : HT2=X : POKE P+NC, V+l : POKE P+ 
NC+2, Z+38:NC=NC+4:G0T0 1211 

1277 POKE Z9, 256: GEMSVS (78) : IF BZ>62 T 
HEN 1283 ELSE BZ=BZ+1 : GOTOXV 32,7 

1278 ?" ";BZ: COLOR CC9, CC9, CC9 : LINEF 
M-l, X-38, V, Z: IF BZ=1 THEN HT3=M:HT4=X 

1279 COLOR 1, 1, 1 : GOTOXV 32, 18 : ?"X"M-1" 
"iGOTOXV 32, ll:?"V"X-38" " 

1288 LINEF M-l, X-38, M-l, X-38: BG=M-1: BE 

=X : V=M-1 : Z=X-38 : POKE P+NC, V+l 

1281 POKE P+NC+2,Z+38:NC=NC+4:G0T0 121 

1 

1283 SOUND 1,13, 9, 4, 6: SOUND 1,8: GOTO 1 
211 

1285 GEMSVS (78) : POKE C,9:P0KE C+2, BZ+1 



:POKE C+6, 8:UDISVS(1) :GOTO 1211 
1308 SAUiPOKE C / 32'.P0KE C+2,B:P0KE C+6 
,l:POKE I, It UDISVS CI) :POKE Z9, 256 
1381 GEMSVS (78) : POKE I, 8 : UDISVS (1) : POK 
E C, ll:POKE C+2, 2:P0KE C+6, 8 
1302 POKE C+18,l:P0KE P, 5O0:POKE P+2, 1 
5:P0KE P+4,515:P0KE P+6, 28 : UDISVS (1) 
1383 COLOR 1,1, 1, 4,2:F0R GI=8 TO 50 ST 
EP lOiPOKE P, 584-GI : POKE P+2, 18B-GI 

1304 POKE P+4, 586+GI:P0KE P+6,346+GI:U 
DISVS(l) :NEXT GUGOTOXV 32,1 

1305 RESTORE 1386:F0R VU=1 TO 10 : READ 
AA, BB, CC, DD, EE, FF : COLOR 1, 1, 1. EE, FF 

1306 DATA 534,58,635,395,4,2,534,58,63 
4, 394, 4, 2, 539, 55, 608, 89, 1, 1, 541, 57 

1307 DATA 618,91,8,8,541,74,618,91,8,8 
, 541, 148, 623, 344, 1, 1, 543, 142, 625, 346 

1308 DATA 0,8,609,142,625,346,0,0,539, 
361, 608, 378, 1, 1, 541, 363, 618, 388, 8, 8 

1309 POKE P, AA : POKE P+2, BB:POKE P+4, CC 
:POKE P+6, DD : UDISVS (1) : NEXT VU 

1318 POKE P, 543:P0KE P+4, 625:F0R UQ=15 
9 TO 338 STEP 17:P0KE P+2, UQ 

1311 POKE P+6, UQiUDISVS(l) :NEXT:GOTOXV 
32,1:?" LOAD":GOTOXV 32,2:?" SAUE" 

1312 GOTOXV 32,19:?" INDEX"; : FOR UT=1 
TO 12 

1313 GOTOXV 32, UT+5:?" PIC"J UT : NEXT : GO 
SUB 328:G0SUB 1438:G0T0 1348 

1317 POKE C, 32: POKE C+2, 0: POKE C+6,1:P 
OKE 1, 1 : UDISVS (1) :POKE C, 11 

1318 POKE C+2, 2: POKE C+6, 8 : POKE C+18, 1 
iCOLOR 1, l,l,l,l:GOSUB 1565 

1319 BT1=8:BT2=8:BT3=8:BT4=8:BT5=8:BT6 
=8:BT7=8:BT8=8:BT9=B:BTA=B:BTB=B:BTC=8 
1326 ON ERROR GOTO 1321:BL0AD "PIC1":G 
OTOXV 36,6:?"*":BTl=l:G0T0 1322 

1321 RESUME 1322 

1322 ON ERROR GOTO 1323:BL0AD "PIC2":G 
OTOXV 36,7:?"*":BT2=l:G0T0 1324 

1323 RESUME 1324 

1324 ON ERROR GOTO 1325:BL0AD "PIC3":G 
OTOXV 36, 8 :?"«": BT3=1: GOTO 1326 

1325 RESUME 1326 

1326 ON ERROR GOTO 1327:BL0AD "PIC4":G 
OTOXV 36,9:?"*":BT4=l:G0T0 1328 

1327 RESUME 1328 

1328 ON ERROR GOTO 1329:BL0AD "PIC5":G 
OTOXV 36, 18 :?"*": BT5=l: GOTO 1330 

1329 RESUME 1338 

1330 ON ERROR GOTO 1331:BL0AD "PIC6":G 
OTOXV 36, 11 :?"*": BT6=l: GOTO 1332 

1331 RESUME 1332 

1332 ON ERROR GOTO 1333:BL0AD "PIC7":G 
OTOXV 36, 12 :?"*": BT7=l: GOTO 1334 

1333 RESUME 1334 

1334 ON ERROR GOTO 1335:BL0AD "PIC8":G 
OTOXV 36,13:?"*":BT8=l:G0T0 1336 

1335 RESUME 1336 

1336 ON ERROR GOTO 1337:BL0AD "PIC9":G 
OTOXV 36,14:?"*":BT9=l:G0T0 1338 

1337 RESUME 1338 

1338 ON ERROR GOTO 1339:BL0AD "PIC10": 
GOTOXV 36,15:?"*":BTA=l:G0T0 1340 

1339 RESUME 1348 

1340 ON ERROR GOTO 1341:BL0AD "PIC11": 
GOTOXV 36, 16 :?"*": BTB=l: GOTO 1342 

1341 RESUME 1342 

1342 ON ERROR GOTO 1343:BL0AD "PIC12": 
GOTOXV 36,17:?"*":BTC=l:G0T0 1344 

1343 RESUME 1344 

1344 POKE Z9, 3: GEMSVS (78) 

1348 POKE C, 32:P0KE C+2, B:POKE C+6, UP 
OKE 1,3: UDISVS (1) : POKE C, 11 

1349 POKE C+2, 2:P0KE C+6,8:P0KE C+18, 1 
: COLOR 1,1,1,1,1 

1358 POKE Z9, 257: GEMSVS (78) 

1351 GEMSVS (79) :M=PEEK(g+2) :X=PEEK(g+4 
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) 

1353 IF W>541 AND W<618 AND X>57 AND X 
<74 THEN Xi-57:G0T0 1365 

1354 IF M>541 AND W<618 AND X>74 AND X 
<91 THEN X1=74:G0T0 1365 

1356 IF W>541 AND U<618 AND X>363 AND 
X<388 THEN X1=363:G0T0 1365 

1357 IF M>552 AND X<38 THEN 1368 ELSE 
1351 

1368 POKE C,32:P0KE C+2,8:P0KE C+6, 1:P 
OKE I,liUDISVS(l) :GOTO 88 

1365 POKE Z9, 256: GEMSVS (78) : POKE P, 541 
: POKE P+2, XI : POKE P+6, Xl+17 

1366 POKE P+4, 618 : UDISVS (1) :LINEF 548, 
Xl-38, 548, Xl-38 SPOKE Z9, 257: GEMSVS (78) 
1378 GEMSVS 179) :W=PEEK(g+2) :X=PEEK(g+4 
):IF PEEK(G+6)-l THEN 1388 

1371 IF PEEKCG+G)=2 AND X>363 AND X<38 
8 AND W>541 THEN 1399 

1372 IF X>X1 AND X<X1+18 AND W>548 AND 
W<618 THEN GOTO 1378 

1373 POKE 29, 256 : GEMSVS (78) :UDISVS(1) : 
LINEF 548,X1-38,548,X1-38:G0T0 1358 
1388 SOUND 1,15,5,3,15:S0UND 1,8:IF XI 
=57 THEN LOP=l:GOTO 1451 

1381 IF Xl=363 THEN 1388 

1382 IF Xl=74 THEN L0P=2:G0T0 1451 ELS 
E 1365 

1388 POKE Z9, 256 : GEMSVS 178) :UDISVSC1) I 
LINEF 548, Xl-38, 548, Xl-38: GOTO 1317 
1399 POKE Z9, 256 : GEMSVS 178) :LINEF 540, 
Xl-38, 548, X1-38:UDISVS(1) 
1488 ON ERROR GOTO 1481:BL0AD ,, PIC1":B 
LOAD "PICl",MEMl:BTl=l:GOTO 1402 

1481 RESUME 1482 

1482 ON ERROR GOTO 1483:BL0AD "flLr :a 
LOAD "PIC2",MEMl:BT2=l:G0T0 1484 

1483 RESUME 1484 

1484 ON ERROR GOTO 1485:BL0AD "PIC3":B 
LOAD "PIC3",MEMl:BT3=l:G0T0 1486 

1405 RESUME 1486 

1486 ON ERROR GOTO 1487:BL0AD "PIC4":B 
LOAD ,, PIC4",MEMl:BT4=l:G0T0 1488 

1487 RESUME 1488 

1488 ON ERROR GOTO 1489:BL0AD "PIC5":B 
LOAD "PIC5",MEMl:BT5=l:G0T0 1418 

1489 RESUME 1418 

1418 ON ERROR GOTO 1411:BL0AD "PIC6":B 
LOAD "PIC6",MEMl:BT6=l:G0T0 1412 

1411 RESUME 1412 

1412 ON ERROR GOTO 1413:BL0AD ,, PIC7 ,, :B 
LOAD ,, PIC7",MEMl:BT7=l:G0T0 1414 

1413 RESUME 1414 

1414 ON ERROR GOTO 1415:BL0AD n PIC8 M :B 
LOAD ,, PIC8",MEMl:BT8=l:G0T0 1416 

1415 RESUME 1416 

1416 ON ERROR GOTO 1417:BL0AD "PIC9":B 
LOAD ,, PIC9",MEMl:BT9=l:G0T0 1418 

1417 RESUME 1418 

1418 ON ERROR GOTO 1419:BL0AD "PIC18": 
BLOAD "PIC18 ,, ,MEMl:BTA=l:G0T0 1428 

1419 RESUME 1428 

1428 ON ERROR GOTO 1421:BL0AD "PIC11": 
BLOAD "PI Cll", MEM1 i BTB=1 i GOTO 1422 

1421 RESUME 1422 

1422 ON ERROR GOTO 1423:BL0AD "PIC12 M : 
BLOAD "PIC12",MEMl:BTC=l:G0T0 1425 

1423 RESUME 1425 

1425 POKE Z9, 3: GEMSVS (78) :GOSUB 1585:G 

OSUB 1438:G0T0 1358 

1438 IF BT1=1 THEN GOTOXV 36,6:?"*" 

1431 IF BT2=1 THEN GOTOXV 36, 7 : ?"* M 

1432 IF BT3=1 THEN GOTOXV 36,8:?"*" 

1433 IF BT4=1 THEN GOTOXV 36* 9 '• ?"#" 

1434 IF BT5=1 THEN GOTOXV 36, IB :?"*" 

1435 IF BT6=1 THEN GOTOXV 36,11:?"*" 

1436 IF BT7=1 THEN GOTOXV 36,12:?"*" 

1437 IF BT8=1 THEN GOTOXV 36,13:?"*" 



1438 IF BT9=1 THEN GOTOXV 36, 14 :?"*" 

1439 IF BTA=1 THEN GOTOXV 36, 15 : ? ,, * ,, 
1448 IF BTB=1 THEN GOTOXV 36, 16:?"*" 

1441 IF BTC=1 THEN GOTOXV 36, 17 ! ?"*" 

1442 RETURN 

1448 POKE P, 541:P0KE P+2, XUPOKE P+6, X 
1+17:P0KE P+4, 618 : UDISVS (1) 

1449 LINEF 548, Xl-38, 548, Xl-38 
1458 POKE Z9, 257: GEMSVS (78) 

1451 GEMSVS(79) :W=PEEK(g+2) :X=PEEK(g+4 

1452 IF W>552 AND X<38 THEN 1368 

1453 IF PEEK(G+6)=2 THEN POKE Z9, 256:G 
EMSVS(78) :GOTO 1471 

1454 IF H>542 AND W<618 AND X>142 AND 
X<346 THEN 1455 ELSE 1451 

1455 GEMSVS(79) :M=PEEK(g+2) :X=PEEK(g+4 
) 

1456 IF X>329 THEN X5=329:G0TO 1475 

1457 IF X>312 THEN X5=312:G0TO 1475 

1458 IF X>295 THEN X5=295:G0TO 1475 

1459 IF X>278 THEN X5=278:G0TO 1475 
1468 IF X>261 THEN X5=261:G0T0 1475 

1461 IF X>244 THEN X5=244:G0TO 1475 

1462 IF X>227 THEN X5=227:G0T0 1475 

1463 IF X>218 THEN X5=218:G0T0 1475 

1464 IF X>193 THEN X5=193:G0T0 1475 

1465 IF X>176 THEN X5=176:G0TO 1475 

1466 IF X>159 THEN X5=159:G0TO 1475 

1467 X5=142:G0T0 1475 

1478 POKE Z9, 256 : GEMSVS (78) :UDISVS(1) I 
LINEF 542,X5-38,542,X5-38 

1471 IF L0P=1 THEN IP=57 

1472 IF L0P=2 THEN IP=74 

1473 LINEF 548, IP-38, 548, IP-38 : POKE P, 
54l:P0KE P+2, IP:POKE P+4, 618 

1474 POKE P+6, IP+17:UDISVS(1) :POKE Z9, 
257:GEMSVS(78) :GOTO 1351 

1475 POKE Z9,256:GEMSVS(78) :POKE P, 543 
:POKE P+2, X5:P0KE P+6, X5+17 

1476 POKE P+4, 689 : UDISVS (1) : LINEF 542, 
X5-38, 542, X5-38:P0KE Z9, 257 1 GEMSVS (78) 

1477 GEMSVS(79) :M=PEEK (g+2) ! X=PEEK (G+4 
):IF PEEK(G+6)=1 AND L0P=1 THEN 1518 

1478 IF PEEK(G+6)=1 AND L0P=2 THEN 148 
5 

1479 IF PEEK(G+6)=2 AND X>363 AND X<38 
8 AND W>541 THEN 1478 

1488 IF X>X5 AND X<X5+18 AND W>548 AND 

W<629 THEN GOTO 1477 
1481 POKE Z9, 256: GEMSVS (78) :UDISVS(1) : 
LINEF 542, X5-38, 542, X5-38:G0T0 1458 

1485 POKE Z9, 256 : GEMSVS (78) :GOSUB 1585 
:UDISVS(1) :LINEF 542, X5-38, 542, X5-38 

1486 POKE P, 541:P0KE P+2,XHP0KE P+6, X 
1+17:P0KE P+4,618:UDISVS(1) 

1487 LINEF 548, Xl-38, 548, Xl-38 i ON ERRO 
R GOTO 1581 

1488 IF X5=142 THEN GOTOXV 36, 6 : ?"*" : B 
SAUE "PIC1",MEM1, 277B8:BT1=1 

1489 IF X5=159 THEN GOTOXV 36,7:?"*":B 
SAUE "PIC2",MEM1, 277B8:BT2=i 

1498 IF X5=176 THEN GOTOXV 36, 8 :?"*": B 
SAUE "PIC3",MEM1,2778B:BT3=1 

1491 IF X5=193 THEN GOTOXV 36, 9 1 ?"* M : B 
SAUE "PIC4",MEM1, 27788 :BT4=1 

1492 IF X5=218 THEN GOTOXV 36, 18 : ?"*" : 
BSAUE "PIC5 M ,MEM1, 27788:BT5=1 

1493 IF X5=227 THEN GOTOXV 36, ll:?"*": 
BSAUE "PIC6",MEM1, 2778B:BT6=1 

1494 IF X5=244 THEN GOTOXV 36,12:?"*": 
BSAUE "PIC7",MEM1,27708:BT7=1 

1495 IF X5=261 THEN GOTOXV 36,13:?"*": 
BSAUE "PIC8",MEM1, 27708:BT8=1 

1496 IF X5=278 THEN GOTOXV 36,14:?"*": 
BSAUE "PIC9",MEM1,2778B:BT9=1 

1497 IF X5=295 THEN GOTOXV 36,15:?"*": 
BSAUE "PIC1B",MEM1, 27788 :BTA=1 
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1498 IF X5=312 THEN GOTOXV 36, 16 : ? M *" I 
BSAUE "PIC11",MEM1,2778B:BTB=1 

1499 IF X5=329 THEN GOTOXV 36, 17 : ?"* M : 
BSAUE "PIC12 ,, ,MEM1,27788:BTC=1 

1588 POKE Z9, 3:GEMSYS(78) :GOSUB 1585 :G 
OSUB 1438:G0T0 1348 
1581 RESUME 1582 

1502 GOSUB 1585:G0SUB 1438:P0KE Z9, 3 I G 
EMSYS (78) 

1583 GOSUB 1585: GOSUB 1438: POKE Z9,3:G 
EMSVS (78) 

1584 GOTO 1348 

1585 POKE C, 32: POKE C+2, 0:POKE C+6, 1:P 
OKE I,l:UDISVS(l) 

1586 FOR UQ=6 TO 17:G0T0XV 36, UQ:? 

NEXT UQ:POKE I, 3 : UDISYS (1) 

1587 POKE C, llsPOKE C+2, 2:P0KE C+6, 0:P 
OKE C+18, l:COLOR 1, 1, 1,1,1: RETURN 
1518 POKE Z9, 256:GEMSVS(78) 

1512 ON ERROR GOTO 1526: IF X5=142 THEN 
BLOAD ,, PICi ,, ,MEMi:BTl=l 

1513 IF X5=159 THEN BLOAD "PIC2", MEM1 : 
BT2=1 

1514 IF X5=176 THEN BLOAD "PIC3", MEM1 : 
BT3=1 

1515 IF X5=193 THEN BLOAD "PIC4", MEM1 : 
BT4=1 

1516 IF X5=218 THEN BLOAD "PIC5", MEM1 : 
BT5=1 

1517 IF X5=227 THEN BLOAD "PIC6 M , MEM1 : 
BT6=1 

1518 IF X5=244 THEN BLOAD ■ , PIC7 M , MEM1 : 
BT7=1 

1519 IF X5=261 THEN BLOAD "PIC8", MEM1 : 
BT8=1 

1528 IF X5=278 THEN BLOAD "PIC9", MEM1 : 
BT9=1 

1522 IF X5=295 THEN BLOAD "P I CIO", MEM1 
:BTA=1 

1523 IF X5=312 THEN BLOAD ,, PIC11",MEM1 
:BTB=1 

1524 IF X5=329 THEN BLOAD "PIC12", MEM1 
:BTC=1 

1525 POKE Z9, 3:GEMSVS(78) : GOSUB 1585 :G 
OSUB 1438:G0T0 1448 

1526 RESUME 1527 

1527 UDISVS(l) :LINEF 542, X5-38, 542, X5- 
38:P0KE Z9, 3 : GEMSVS (78) S GOTO 1458 
1688 TEXTXtPOKE C, 11:P0KE C+2, 2:P0KE C 
+6, 8: POKE C+18, 1: COLOR 1,1,1,1,1 

1681 POKE P,544:P0KE P+2, 87:P0KE P+4, 6 
22 : POKE P+6, 127 : UDISVS (1) : POKE P+4, 624 
1602 COLOR 1,1, 1, 8,8:P0KE P, 546:P0KE P 
+2, 89iP0KE P+6, 129: UDISVS (1) 
1683 POKE P, 548:P0KE P+2, 91:P0KE P+4, 6 
22:P0KE P+6, 127 : UDISVS (1) : POKE C, 106 

1605 POKE C+2, 8:P0KE C+6, 1:P0KE I,TE1+ 
TE2+TE3+TE4+TE5: UDISVS (1) :POKE P+2, SZ1 

1606 POKE C+2, l:POKE C, 12SP0KE C+6, 8:P 
OKE P, 8 : UDISVS (1) : POKE C, 8:P0KE C+6, 3 

1607 POKE P, COX:POKE P+2, COVsPOKE 1,65 
:POKE 1+2, 66SP0KE 1+4, 67 : UDISVS (1) 
1688 POKE C, 12: POKE C+2, 1: POKE C+6, 8:P 
OKE P,B:POKE P+2, 13 : UDISVS (1) 

1618 XCX=CXX:VCV=CVV:POKE C, 11:P0KE C+ 

2, 2 :P0KE C+6, 8: POKE C+18, 1 

1611 PS=8 : COLOR 1,1, 1,1,1: IF LX=1 THEN 

KOL=l:GOSUB 1929 
1628 POKE C, 114: POKE C+2, 2: POKE C+6, 8: 
POKE C+18, l: COLOR 1, 1, 1, 4, 2 : POKE P, 535 

1621 POKE P+2, 138: POKE P+4, 633: POKE p+ 
6,393:UDISVS(1) :POKE C,186:P0KE C+2, 8 

1622 POKE C+6,l:P0KE I, 8 : UDISVS (1) I POK 
E C,ll:POKE C+2,2:P0KE C+6, 8:XX=B:P>:=8 

1623 BU=588 : RESTORE 1625: FOR IR=1 TO 2 
7 : READ AA, BB, CC, DD, EE : POKE P, AA+BU 

1624 POKE P+2, BB : POKE P+4, CC+BU I POKE P 
+6,DD:C0L0R 1, 1, 1, EE, EE I UDISVS (1) :NEXT 



1625 DATA 37,218,129,358,1,39,212,131, 
368, 8, 41, 214, 129, 358, 8, 37, 188, 57, 284, 1 

1626 DATA 39,182,59,286,8,41,184,57,28 
4, 8, 61, 188, 81, 284, 1, 63, 182, 83, 286, 8, 65 

1627 DATA 184,81,284,8,85,188,185,284, 
1, 87, 182, 187, 286, 8, 89, 184, 185, 284, 8 

1628 DATA 189,188,129,284,1,111,182,13 
1, 286, 8, 113, 184, 129, 284, 8, 37, 364, 129 

1629 DATA 386,1,39,366,131,388,8,41,36 
8, 129, 386, 8, 37, 136, 57, 168, 1, 39, 138, 59 
1638 DATA 162,8,41,148,57,168,8,61,136 
, 81, 168, 1, 63, 138, 83, 162, 8, 65, 148, 81 

1631 DATA 168,8,85,136,129,168,1,87,13 
8, 131, 162, 8, 89, 148, 129, 168, 8 

1632 COLOR 1,1, 1,4, 2 SPOKE P, 3: POKE P+2 
,3:P0KE P+4,528:P0KE P+6, 31 : UDISVS (1) 

1636 07=8:P0KE P+2, 214:P0KE P+6, 358:F0 
R UQ=541 TO 638 STEP 11: POKE p, UQ 

1637 POKE P+4, UQ : UDISVS (1) : NEXT : POKE P 
,54l:P0KE P+4, 628 

1638 FOR UQ=214 TO 368 STEP 18:P0KE P+ 
2,UQ:P0KE P+6, UQ : UDISVS (1) : NEXT 

1639 POKE C, 32 : POKE C+2, 8: POKE C+6,1:P 
OKE I,3:UDISVS(1) :POKE C,11:P0KE C+2, 2 
1678 POKE C+6, 8 : POKE C+18, 1: COLOR 1,1, 
l,l,l:POKE P,541:P0KE P+4, 557 : UPX=8 

1671 POKE P+2, 184 : POKE P+6, 204 : UDISVS ( 
1):LINEF 548, 146,548, 146:P0KE C, 12 

1672 POKE C+2, 1 : POKE C+6, 8: POKE P,8:P0 
KE P+2,13:UDISVS(1) :BK=16:P0KE P+2,206 

1673 POKE C, 8: POKE C+2, 1: POKE C+6, l'.ZX 
=8:F0R 00=545 TO 620 STEP 24:BK=BK+1 

1674 POKE I,BK:POKE P, 00 : UDISVS (1) : HEX 
T 00 : AX=541 : GOSUB 1928: GOTOXV 35, 6:?; 8 

1676 POKE P+2, 157:P0KE I,4:P0KE P,545: 
UDISVS(l) :POKE I,3:P0KE P,578:UDISVS 

1677 POKE C+6, 5 : POKE P, 563: POKE P+2, 38 
2:P0KE I,83:P0KE 1+2, 88:P0KE 1+4,65 

1678 POKE 1+6, 67 : POKE 1+8, 69 : UDISVS (1) 
1699 QlQ=l:POKE P, 8: POKE P+6, 481: POKE 
P+4, 8: POKE P+2, 481 : CXX=8 : CYX=435 

1788 GOTO 1782 

1781 POKE C, 32 : POKE C+2, 8 : POKE C+6,1:P 
OKE I,liUDISVS(l) :POKE Z9, 257 : GEMSVS (7 
8) 

1782 GEMSVS (79) :M=PEEK(g+2) :X=PEEK(g+4 
) :0G=PEEK(G+6) 

1783 IF 0G=2 THEN POKE Z9, 256 : GEMSVS (7 
8) :PS=8:G0SUB 1978:G0T0 1888 

1784 IF W<530 AND X>37 AND X<383 THEN 
1718 

1785 IF W>552 AND X<38 THEN 1988 ELSE 
1702 

1718 POKE C, 32: POKE C+2, 8: POKE C+6, i:P 
OKE 1,3: UDISYS (1) : POKE C,11:P0KE C+2, 2 

1711 POKE C+6,8:P0KE Z9, 256 : GEMSVS (78) 

1712 GEMSVS (79) :W=PEEK(g+2) :X=PEEK(g+4 
) :0G=PEEK(G+6) 

1713 IF W>529-SXX THEN W=529-SXX 

1714 IF X<39+SVX THEN X=39+SVX 

1715 UDISVS(l) :P0KE P,H+1UF X>382 THE 
N X=382 

1716 POKE P+6, XiPOKE P+4, W+SXx: POKE P+ 
2, X-SVX-l:UDISVS(l) : CXX=W : CYX=X 

1717 IF 0G=1 THEN POKE Z9, 257 : GEMSVS (7 
8): POKE C, 8: GOTO 1719 ELSE GOTO 1781 

1719 LINEF M, X-39-SVX, U, X-39-SVX : FOR U 
Q=8 TO 127 STEP 2:P0KE I+UQ, 8 : UDISVS 
172B NEXT : C JX=528-M : C I X=SXX-QMX : VC=C Jx 
/C IX-QNX : XX=8 : PX=8 : POKE C, 32 : T0T=SXX-2 

1721 POKE C+2,8:P0KE C+6, UPOKE I,1:UD 
ISVS(1):P0KE C,ll:IF VC>64 THEN VC=64 

1722 POKE C+2, 2: POKE C+6, 8: POKE C+18, 1 
:COLOR 1, l,l,l,l:POKE P,7:P0KE P+2, 7 

1723 POKE P+6,26:P0KE P+4, YC*8+18 : UDIS 
VS(1): COLOR 1, 1, 1, 8, 8 : POKE P+4, YC*8+12 

1724 POKE P,9:P0KE P+2,9:P0KE P+6,28:U 
DISVS(l) :COLOR 1, 1, 1, 1, 1 : GOTOXV 35,6 
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1725 ?;YC-PX/2:P0KE P, 11 : POKE P+2, 11 :P 
OKE P+6,26:P0KE P+4, 18 : UDISYS (1) 
1738 GEMSVS (79) :U=PEEK(g+2) :X=PEEK(g+4 
J :0G=PEEK(G+6) 

1731 IF OX=l AND OG=l AND M>537 AND M< 
629 AND X>188 AND X<284 THEN 1918 

1732 IF OX=l AND OG=l THEN 1736 

1733 IF W>552 AND X<38 THEN PS=l:GOTO 
1988 

1734 IF 0G=2 THEN POKE Z9, 256: GEMSVS (7 
8) :PS=l:GOSUB 1978 : GOTO 1888 

1735 OX=l:GOTO 1738 

1736 IF W>541 AND U<629 AND X>214 AND 
X<358 THEN 1745 

1737 IF U>541 AND W<557 AND X>148 AND 
X<168 THEN 1788 

1738 IF U>565 AND W<581 AND X>148 AND 
X<168 THEN 1781 

1739 IF PX<2 AND M>541 AND W<629 AND X 
>363 AND X<386 THEN 1755 

1748 IF W>541 AND W<629 AND X>363 AND 
X<386 THEN 1754 

1741 IF W>9 AND M<522 AND X>9 AND X<26 
THEN 1948 

1742 IF H>548 AND U<622 AND X>91 AND X 
<127 THEN PS=l:ZX=e:UP>:=e:GOTO 1778 

1743 GOTO 1738 

1745 GEMSVS (79) :N=PEEK(g+2)-54l:X=PEEK 
(g+4) 

1746 IF X>348 THEN CX=56:G0T0 1756 

1747 IF X>322 THEN CX=48:G0T0 1756 

1748 IF X>384 THEN CX=48:G0T0 1756 

1749 IF X>286 THEN CX=32:G0T0 1756 
1758 IF X>268 THEN CX=24:G0T0 1756 

1751 IF X>258 THEN CX=16:G0T0 1756 

1752 IF X>232 THEN CX=8:G0T0 1756 

1753 CX=8:G0T0 1756 

1754 QX=8:G0T0 1768 

1755 QX=B:ZX=8:G0T0 1761 

1756 DX=M/ll:QX=CX+DX+07-64 
1768 IF PX<1 THEN ZX=CS-:+DX+07-64 

1761 IF YC-PX/2<1 THEN 1738 

1762 POKE C, 8 : POKE C+2,1:P0KE C+6, PX/2 
+l:POKE P, llsPOKE P+2, 24 

1763 POKE I,Zx:POKE I+PX, QX 

1764 PX=PX+2 : UDISYS (1) : GOTOXY 35, 6:?; V 
C-PX/2:0X=8:UAUE 1,5,3,588,8 

1765 IF YC-PX/2<1 THEN GOTO 1738 

1766 POKE C, 32 : POKE C+2, 8: POKE C+6, l:P 
OKE 1,3: UDISVS (1) : POKE C, 1HPOKE C+2, 2 

1767 POKE C+6,8:P0KE P, Px*4+10 : POKE P+ 
2, 18 ■' POKE P+4, PX*4+18 : POKE P+6, 18 

1768 COLOR 1,1, 1,1, l:UDISVS(l) :POKE P+ 
4, PX*4+19:P0KE P+6, 27 : UDISVS (1) 

1769 POKE C,32:P0KE C+2, 8:P0KE C+6, l:P 
OKE I,l:UDISVS(l) : UPX=PX : GOTO 1738 
1778 GOSUB 1978:PS=8:CBL0R 1,1,1, 4, 2:G 
OTOXV 35,6:?;0:P0KE C,ll:POKE C+2, 2 

1771 POKE C+6,0:P0KE C+18, l:POKE P, 3:P 
OKE P+2,3:P0KE P+4, 528:P0KE P+6, 31 

1772 UDISVS(l) :COLOR 1, 1, 1, 1, 1 : GOTO 16 
99 

1788 IF PX/2=8 THEN 1738 ELSE PX=PX-2: 
LBX=8:G0T0 1783 

1781 IF YC-PX/2<2 THEN 173B ELSE PY.-PY. 
+2:LBX=1 

1783 GOTOXV 35, 6 : ?; YC-PX/2 : 0X=8 :WAUE 1 
,5, 3, 508,8:POKE C, 32:P0KE C+2, 8 

1784 POKE C+6,l:P0KE I, 3 : UDISVS (1) : POK 
E C,ll:POKE C+2,2:P0KE C+6, 8 

1785 IF LBX=8 AND YC-PX/2<2 THEN 1791 

1786 POKE P, UPX*4+18 : POKE P+2, 1B:P0KE 
P+4, UPXK4+18: POKE P+6, 18 

1787 COLBR 1, 1, 1, 1, 1 : UDISVS (1) i POKE P + 
4,UPX*4+19:P0KE P+6, 27 : UDISYS (1) 

1791 COLOR 1,1, 1,1,1: POKE P, Px*4+18:P0 
KE P+2,10:P0KE P+4, Px*4+18 

1792 POKE P+6, IBiUDISVSd) :POKE P+4, Px 



*4+19 : POKE P+6, 27 : UDISVS (1) 

1795 POKE C,32:P0KE C+2,B:P0KE C+6,1:P 

OKE I,l:UDISVS(l) :UPX=Px:GOTO 1738 

1888 POKE C, 114:P0KE C+2, 2:P0KE C+6, 8: 
COLOR 1,1, 1,4,2:P0KE P, 535 

1881 POKE P+2, 138:P0KE P+4,633:P0KE P+ 
6, 393:UDISVS(1) :POKE C,ll:POKE C+18, 1 

1882 COLOR 1,1,1, 4, 2: POKE P, 3: POKE P+2 
,3:P0KE P+4,528:P0KE P+6, 31 : UDISYS (1) 
1884 BU=588:REST0RE 1886:F0R IR=1 TO 2 
6:READ AA, BB, CC,DD, EE:POKE P, AA+BU 

1865 POKE P+2, BB:POKE P+4, CC+BU : POKE P 
+6,DD:C0L0R 1, 1, 1, EE, EE :UDISVS (1) : NEXT 

1866 DATA 38, 254, 127, 366,1,48,256,129, 
368, 8, 42, 258, 127, 278, 8, 42, 288, 127, 366 

1867 DATA 8,42,382,127,322,8,42,324,12 
7, 344, 6, 42, 346, 127, 366, 8, 67, 152, 95, 178 

1868 DATA 1,69,154,97,188,8,71,156,95, 
178, 8, 58, 187, 78, 213, 1, 52, 189, 88, 215, 6 

1889 DATA 54,191,78,213,8,84,187,112,2 
13, 1, 86, 189, 114, 215, 8, 88, 191, 112, 213, 8 
1816 DATA 58,221,78,247,1,52,223,88,24 
9, 8, 54, 225, 78, 247, 8, 84, 221, 112, 247, 1 

1811 DATA 86,223,114,249,8,88,225,112, 
247, 8, 38, 372, 127, 387, 1, 48, 374, 129, 389 

1812 DATA 8,42,376,85,387,1,87,376,127 
,387,8 

1815 BP=8:REST0RE 1828:F0R WQ=1 TO 5:R 
EAD GT, TG : BP=BP+22 : POKE C, 186 

1816 POKE C+2,8:P0KE C+6,l:P0KE I,GT:U 
DISVS(l) :POKE C,8:P0KE C+2, 1 

1817 POKE C+6,TG:P0KE P,546:P0KE P+2, 2 
51+BPSF0R UQ=8 TO TG*2-i STEP 2 

1818 READ AP:POKE I+UQ,AP:NEXT UQ:UDIS 
VS(1):NEXT tlQ : POKE C, 186:P0KE C+2, 8 
1826 DATA 1,4,66,79,76,68,2,4,71,82,69 
, 89, 4, 4, 83, 75, 69, 87, 8, 9, 85, 78, 68, 69 

1821 DATA 82,76,73,78,69,16,7,79,85,84 
,76,73,78,69 

1822 POKE C + 6, l:POKE I, 8 : UDISYS (1) : POK 
E C, 12 : POKE C+2, 1: POKE C+6, 8: POKE P, 8 

1823 POKE P+2, 13:UDISYS(1) :GOTOXY 34,7 
:?"l":GOTOXY 33, 9 : ?"2" : GOTOXV 35,9 

1824 ?"3": GOTOXY 33, 11 : ?"4" : GOTOXY 35, 
ll:?"5":P0KE P+2, 13:UDISVS(1) :XCX=8 

1825 YCY=48B:IF SZ1=4 THEN GOSUB 1886 

1826 IF SZ1=6 THEN GOSUB 1887 

1827 IF SZ1=13 THEN GOSUB 1888 

1828 IF SZ1=12 THEN GOSUB 1889 

1829 IF SZ1=26 THEN GOSUB 1898 

1838 IF TE1=1 THEN X1=258:G0SUB 1878 

1831 IF TE2=2 THEN X1=28B:G0SUB 1878 

1832 IF TE3=4 THEN X1=362:G0SUB 1878 

1833 IF TE4=8 THEN X1=324:G6SUB 1878 

1834 IF TE5=16 THEN Xl=346: GOSUB 1878 

1839 POKE Z9, 257: GEMSVS (78) 

1848 GEMSVS(79) :M=PEEK(g+2) :X=PEEK(g+4 
) :0G=PEEK(G+6) 

1841 IF OG=l AND W>554 AND U<612 AND X 
>156 AND X<247 THEN GOTO 1888 

1842 IF OG=l AND N>542 AND U<627 AND X 
>258 AND X<366 THEN 1855 

1843 IF OG=l AND W>542 AND M<627 AND X 
>376 AND X<387 THEN 1858 

1844 IF 0G=2 THEN POKE Z9, 256 : GEMSYS (7 
8) :GOTO 1620 

1845 IF W>552 AND X<38 THEN 1988 ELSE 
1848 

1858 IF LY.=1 AND M>584 THEN K0L=0:LX=6 
:G0SUB 1965 

1851 IF LY.=Q AND M<584 THEN KOL=i:Ly.=l 
: GOSUB 1985 

1852 GOTO 1848 

1855 IF X>346 AND TXB=8 THEN TE5=16:X1 
=346 :TXB=l:QM/.=8: GOSUB 1878 

1856 IF X>346 AND TX8=1 THEN TE5=B:X1= 
346:TX8=8:QMX=2:G0SUB 1878 

1857 IF X>324 AND TX1=8 THEN TE4=8:X1= 
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324:TX1=1:G0SUB 1878 

1858 IF X>324 AND TXUi THEN TE4=B:X1= 
324:TX1=B:G8SUB 1878 

1859 IF X>382 AND TX2=8 THEN TE3=4:X1= 
302:TX2=l:QHX=l:G0SUB 1878 

1868 IF X>382 AND TX2=1 THEN TE3=8:Xi= 
382:TX2=B:QNX=8:GBSUB 1878 

1861 IF X>288 AND TX3=B THEN TE2=2:X1= 
288:TX3=1:G8SUB 1878 

1862 IF X>288 AND TX3=1 THEN TE2=8:X1= 
288:TX3=8:G0SUB 1878 

1863 IF X>258 AND TX4=8 THEN TEi=UXi= 
258:TX4=l:G8SUB 1878 

1864 IF X>258 AND TX4=1 THEN TE1=8:X1= 
258:TX4=8:G8SUB 1878 

1865 G8T8 1848 

1878 PBKE Z9, 256 : GEMSYS (78) :P8KE C, 32: 
POKE C+2,8:P0KE C+6,UPBKE I,3:UDISVS 

1871 PBKE C,1UPBKE C+2,2:PBKE C+6,B:P 
OKE C+18,l:CBL0R 1, 1, 1, 1, 1 : POKE P, 542 

1872 PBKE P+4, 627:P0KE P+2, XUPOKE P+6 
,X1+28:LINEF 541, Xl-38, 541, Xl-38 

1873 UDISVS (1) : PBKE C,32:PBKE C+2,8:PB 
KE C+6,UPBKE 1,1: UDISVS (1) : PAKE C, 11 

1874 POKE C+2, 2:P0KE C+6,8:PBKE C+1B, 1 
: COLOR 1,1,1, 8, 8: PAKE P, 548 

1875 POKE P+2,91:PBKE P+4, 622:PBKE P+6 
, 127 : UDISVS (1) :PBKE C,1B6:PBKE C+2, 8 

1876 PBKE C+6,l:PBKE I, TE1+TE2+TE3+TE4 
+TE5 : UDISVS II) :PAKE C, 8:PBKE C+2, 1 

1877 POKE C+6, 3JP0KE P, COX:POKE P+2, CO 
V:POKE I,65:P0KE I+2,66:P0KE 1+4,67 

1878 UDISVS(l) :POKE Z9, 257 : GEMSVS 178) : 
X=8:GBT0 1983 

1888 IF W>571 AND W<595 AND X>156 AND 
X<178 THEN GOSUB 1886 

1881 IF U>554 AND W<578 AND X>191 AND 
X<213 THEN GBSUB 1887 

1882 IF W>588 AND W<612 AND X>191 AND 
X<213 THEN GBSUB 1888 

1883 IF W>554 AND W<578 AND X>225 AND 
X<247 THEN GBSUB 1889 

1884 IF M>588 AND W<612 AND X>225 AND 
X<247 THEN GBSUB 1898 

1885 GBTB 1848 

1886 C0X=573 : COV=lll : CXX=571 : CYY=156 : S 
Z1=4:SXX=8:SYX=6:BPX=2:G0T0 1891 

1887 C0X=57B:C8Y=il2:CXX=554:CYY=19i:S 
Z1=6:SXX=1B:SYX=8:BPX=2:GBTB 1891 

1888 C0X=57B:CBY=115:CXX=588:CYY=19US 
Zl=13 : SXX=1B : SYX=16 : BPX=3 : GOTO 1891 

1889 C0X=557:C0V=115:CXX=554:CVV=225:S 
Zl=12:SXX=18:SYX=i6:BPX=3:G8TB 1891 
1898 CBX=553 : CBV=128 : CXX=588 : CYY=225 : S 
Zl=26 : SXX=18 : SYX=32 : BPX=5 

1891 PBKE Z9, 256 : GEMSYS (78) : PBKE C, 1U 
PAKE C+2, 2:P0KE C+6, 8:PBKE C+18, 1 

1892 COLOR 1,1, 1, 8, 8:P0KE P, 548:PBKE P 
+2,91:PBKE P+4,622:PBKE P+6, 127 ! UDISVS 

1893 COLOR 1,1,1, l,l:POKE C, 32:P0KE C+ 
2,8:PBKE C+6,l:P0KE I, 3 : UDISVS (1) 

1894 POKE C, 11 : POKE C+2,2:P0KE C+6,B:P 
BKE C+18,l:C0LBR 1, 1, 1, 1, 1 : PAKE P, CXX 

1895 POKE P+4, CXX+24 : POKE P+2, CVV:POKE 
P+6, CYV+22:UDISYS(1) :POKE P, XCX 

1896 LINEF CXX-1, CVY-38, CXX-1, CVV-38 : P 
OKE P+4, XCX+24:P0KE P+2, YCY 

1897 POKE P+6, VCY+22:LINEF XCX-1, VCY-3 
8, XCX-1, YCV-38 :UDISYS(1) :PBKE C, 32 

1898 POKE C+2, 8:P0KE C+6, l:POKE I,1:UD 
ISVS(l):POKE C, 12:P0KE C+2, 1 

1899 POKE C+6,0:PBKE P,8:P0KE P+2, SZl: 
UDISVS(l) :PBKE C, 8:P0KE C+2, 1 

1908 POKE C+6, 3:P0KE P, COX:POKE P+2, CO 
Y:POKE I,65:P0KE I+2,66:P0KE 1+4,67 
1981 UDISVS(l) :XCX=CXX:YCV=CVY:POKE Z9 
,257:GEMSVS(78) 

1983 CBLBR 1,1,1, 1,1: IF K8L=B THEN RET 



URN 

1905 POKE C, 32: POKE C+2, 8 : POKE C+6, UP 
OKE 1,3: UDISVS (1) : POKE C,ii:POKE C+2, 2 

1986 PBKE C+6,8:PBKE C+18, 1:P0KE P, 548 
:POKE P+2, 91:P0KE P+4, 622:P0KE P+6, 127 

1987 UDISVS (1) : LINEF 547,91-38,547,91- 
38: PBKE C, 32 : POKE C+2, 8: PBKE C+6, 1 
19B8 PBKE I, l:UDISVS(l) : RETURN 

1919 IF W>689 THEN 07=192 : AX=613 : GBSUB 
1915: GBTB 1738 

1911 IF W>585 THEN 07=128 : Ax=589 : GOSUB 
1915:GBTB 173B 

1912 IF W>561 THEN B7=64 : AX=565 : GBSUB 
1915:GBTB 1738 

1913 07=8:AX=54UGBSUB 1915:G0T0 1738 

1915 PBKE Z9, 256:GEMSVS(78) :P0KE C, 32: 
POKE C+2, 8:P0KE C+6, 1:P0KE I,3:UDISVS 

1916 POKE C,ll:POKE C+2,2:P0KE C+6,B:P 
OKE C+18, l: CBLBR 1,1,1,1,1 

1917 PBKE P,Ax:POKE P+4, AX+16 : POKE P+2 
,184:P0KE P+6, 284 1 UDISVS (1) : PAKE P, By. 

1918 LINEF AX-1, 146, AX-i, 146 : POKE P+4, 
BX+16: LINEF BX-1, 146, BX-1, 146 : UDISVS 

1928 PAKE C,32:PAKE C+2,B:PBKE C+6,1:P 
OKE 1,1: UDISVS (1) 

1921 PAKE C, 12 : PAKE C+2^1:PAKE C+6, 8:P 
OKE P,0:PBKE P+2, 13 : UDISVS (1) : BX=AX 

1922 PBKE C,8:P0KE C+6,1:FAR VT=229 TA 
355 STEP 18 : PAKE P+2, VT 

1923 FAR A9=543 TA 628 STEP 11:P0KE P, 
A9 : PAKE I, A7 : A7=A7+1 : UDISVS (1) :NEXT 09 

1924 NEXT VT : PAKE Z9, 257 : GEMSVS (78) : RE 
TURN 

1929 PAKE C,32:PAKE C+2, 8:PAKE C+6, UP 
AKE 1,3: UDISYS (1) : PAKE C, 1UPBKE C+2, 2 

1932 PAKE C+6, 8: PAKE C+18, 1 : PAKE P, 548 
: PAKE P+2, 91 : POKE P+4,622:PAKE P+6, 127 

1933 UDISYS (1) : LINEF 547,91-38,547,91- 
38:PBKE C,32:PBKE C+2,fl:PBKE C+6, 1 

1934 PBKE I,l:UDISYS(l) :RETURN 
1948 IF Q1Q=8 THEN 1945 

1941 POKE C, 32 : POKE C+2, 8 : POKE C+6, UP 
OKE 1,3: UDISVS (1) : POKE C,U:POKE C+2, 2 

1942 POKE C+6,8:P0KE C+18, 1:P8KE P, CXX 
+l:POKE P+2, CVX-SYX-1 : POKE P+4, CXx+SXX 

1943 POKE P+6, CYx: UDISVS (1) sLIHEF CXX, 
CYX-39-SYX, CXX, CYX-39-SYX 

1944 POKE C, 32 : POKE C+2,8:P0KE C+6, 1:P 
OKE 1,1: UDISVS (1) 

1945 Q1Q=8 : OX-0 : IF LX=i THEN 1958 

1946 PBKE C, 186:PBKE C+2, 8:P0KE C+6,1: 
POKE I, TEl+TE2+TE3+TE4+TE5iUDISVS(l) 

1947 POKE P+2,SZl:P0KE C+2, 1:P0KE C, 12 
:POKE C+6,8:P0KE P, 8 : UDISVS (1) 

1948 POKE C, 8:P0KE I,Zx:POKE C+6, Px/2: 
POKE P, CXX+4-QMX+QNX!P0KE P+2, CYX-BPX 

1949 UDISVS(l) :GOTO 1968 

1958 PBKE C, 32 : POKE C+2, 8: POKE C+6, UP 
OKE 1,3: UDISVS (1) : POKE C1UP0KE C+2, 2 

1951 POKE C+6, 8:P0KE C + 18, UPOKE P, CXX 
+UPBKE P+2, CVX-SYX-3 : POKE P+4, 538 

1952 POKE P+6, CVX+2 : UDISYS (1) : LINEF CX 
X, CVX-41-SYX, CXX, CVX-41-SVX : POKE C, 32 

1953 POKE C+2, 8:P0KE C + 6, UPOKE I,UUD 
ISYS(1):P0KE C,186:P0KE C+2, 8 

1954 PBKE C+6, UPAKE I, TE1+TE2+TE3+TE4 
+TE5 : UDISYS (1) :POKE P+2,SZUP0KE C+2, 1 

1955 POKE C,12:P0KE C+6,8:PBKE P,8:UDI 
SYS(1):P0KE C,8:P0KE I,ZX 

1956 POKE C+6, PX/2: POKE P, CXX+4-QMX+QN 
x:POKE P+2, CVX-BPx:UDISVS(l) :POKE C, 32 

1957 POKE C+2,8:P0KE C+6, UPOKE I,3:UD 
ISVS(1):P0KE CiUPOKE C+2, 2 

1958 POKE C+6, 8:P0KE C+18, UPOKE P, CXX 
+UPOKE P+2, CYX-SVX-3 ■' POKE P+4, 538 

1959 PBKE P+6, CYX+2 : UDISVS (1) :LINEF CX 
X, CVX-41-SVX, CXX, CVX-41-SVX : PBKE C, 32 
1968 PBKE C+2,8:P0KE C+6,UPBKE I,UUD 
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196B POKE C I 12:P0KE C+2,i:P0KE C+6,0:P 

OKE P,8:P0KE P+2, 13 : UDISYS (1) 

1969 POKE C,106:P0KE C+2,0:P0KE C+6,i: 

POKE I,8:UDISYSC1) : GOTO 1730 

1976 IF Q1Q=B THEN RETURN 

1971 POKE C, 32:P0KE C+2,8:P0KE C+6, l:P 
OKE I,3:UDISYSC1) :POKE C,ii:POKE C+2, 2 

1972 POKE C+6, 8:P0KE P, CXX+HIF PS=1 T 
HEN LINEF CXX, CYX-39-SYX, CXX, CYX-39-SY 
K 

1974 POKE P+6, CVXiPOKE P+4, CXX+SXX : POK 
E P+2, CYX-SYX-l: UDISYS CI) : POKE C, 32 

1975 POKE C+2 ( 8:P0KE C+6,1:P0KE I, HUD 
ISVStl) :CXX=8:CV>:=435: RETURN 

1988 GOSUB 1978:P0KE C, 12:P0KE C+2, HP 
OKE C+6, 8:P0KE P, 8:P0KE P+2, 13 : UDISYS 

1981 POKE C,186:P0KE C+2,8:P0KE C+6,l: 
POKE 1,8: UDISVS tl) : POKE C, 11 

1982 POKE Z9, 256 : GEMSYS C78) : POKE C+2, 2 
: POKE C+6, 8.-P0KE C+18, 1 

1983 REST8RE 1986:F0R UV=1 TO 17 : READ 
AA, BB, CC, DD, EE, FFsCOLOR 1, 1, 1, EE, FF 

1985 POKE P,AA:POKE P+2,BB:P0KE P+4, CC 
:POKE P+6,DD:UDISYSC1) :NEXT 

1986 DATA 3,3,528,31,4,2,448,6,519,25, 
1, 1, 458, 8, 521, 27, 8, 8, 452, 18, 519, 25, 8, 8 

1987 DATA 368,6,411,25,1,1,362,8,413,2 
7, 8, 8, 364, 18, 411, 25, 8, 8, 268, 6, 311, 25, 1 

1988 DATA 1,262,8,313,27,8,8,264,18,31 
1, 25, 1, 1, 168, 6, 211, 25, 1, 1, 162, 8, 213, 27 

1989 DATA 8,8,187,18,211,25,1,1,164,18 
, 187, 25, 8, 8, 68, 6, 111, 25, 1, 1, 62, 8, 113 
1998 DATA 27,8,8,64,18,111,25,8,8 

1991 COLOR 1, 1,1,FF1,GFG:C0L0R 1, 1, 1, F 
Fl, GFG: UDISVS CI) : POKE C, 8: POKE C+2, 1 

1992 POKE C+6,4:P0KE I,66:P0KE 1+2,85: 
POKE 1+4, 83:P0KE 1+6, 89:P0KE P, 456 

1993 POKE P+2, 23:UDISVSC1) :POKE C, 11 :P 
OKE C+2, 2 : POKE C+6,8:P0KE P, 455 

1994 POKE P+2, 18 : POKE P+4, 588:P6KE P+6 
, 10 : UDISYS CI) :POKE P+2,25:P0KE P+6, 25 

1995 UDISVSC1) SPOKE Z9, 257 : GEMSYS C78) : 
GOTO 88 

2128 IF DU=1 THEN RESTORE 1188:G0T0 21 
58 

2121 IF DM=2 THEN RESTORE 1186: GOTO 21 
58 

2122 IF DU=3 THEN RESTORE 1184: GOTO 21 
58 

2123 IF DU=4 THEN RESTORE 1182: GOTO 21 
58 

2124 IF DM=5 THEN RESTORE 1188 : GOTO 21 
58 

2125 IF DM=6 THEN RESTORE 1178: GOTO 21 
58 

2126 IF DM=7 THEN RESTORE 1176: GOTO 21 
58 

2127 IF DM=8 THEN RESTORE 1174 : GOTO 21 
58 

2128 IF DU=9 THEN RESTORE 1172: GOTO 21 
58 

2129 IF DU=10 THEN RESTORE 1178 : GOTO 2 
158 

2138 IF DM=11 THEN REST8RE 1168: GOTO 2 
158 

2131 IF DM=12 THEN RESTORE 1166: GOTO 2 
158 

2132 IF DW=13 THEN RESTORE 1164: GOTO 2 
158 

2133 IF DM=14 THEN RESTORE 1162: GOTO 2 
158 

2134 IF DM=15 THEN REST8RE 1168: GOTO 2 
158 

2135 POKE Z9, 257: GEMSVSC78) : GOTO 1112 
2158 GFG=4:P0KE C, 112: POKE C+2, 8: POKE 
C+4, 8:P8KE C+6, 16 : POKE C+8, 8: POKE P, 8 
2151 POKE P+2, 0 : POKE P+4, 8:P0KE P+6, 8: 



POKE P+8, 8 : FOR 11=8 TO 15 : READ LA 

2152 POKE INTIN+II*2, LA : NEXT : UDISVS CI) 
: POKE C,23:P0KE C+2,8:P0KE C+4, 8 

2153 POKE C+6,l:P0KE C+8,2:P0KE C, 1HP 
OKE C+2,2:P0KE C+6,8:P8KE C+18, 1 

2154 COLOR 1,1, 1,4, 4: POKE P,553:P0KE P 
+2, 95 : POKE P+4, 618:P0KE P+6, 134 

2155 UDISVS CI) : POKE P,64:P0KE P+2,18:P 
OKE P+4,lll:P0KE P+6, 25 :UDISVS CI) 

2156 POKE Z9, 257 : GEMSVS C78) : GOTO 1112 
2568 ALERT : POKE Z9, 256 : GEMSVS C78) : Att=G 
B : GINT=PEEK CAtt+8) : G INN-PEEK C Alt + 12) 
2582 ADDR=PEEK CAtt+16) :SQP$="[31 I ARE V 
OU SURE ! ! N I VES | NO 1" 

2563 SQP=varptrCSQP$) : SQP1=INT CSQP/655 
36) :SQP2=SQP-CSQP1*65536) 

2584 P6KE ADDR, SQP1 : P6KE ADDR+2, SQP2 : P 
OKE GINT, 1 : GEMSVS C52) : HQZ=PEEK CGI NN) 

2585 POKE Z9, 3 : GEMSVS C78) : IF HQZ=2 THE 
N POKE Z9, 257: GEMSVS C78) : GOTO 381 

2586 IF ZIP1=1 THEN P6KE INTIN, 8:UDISV 
SCI) :GOTO CLEARX 

2568 POKE C,32:P0KE C+2,8:P6KE C+6, HP 
OKE INTIN,8:UDISVSC1) :POKE GEM,8:ST0P 

Listing I : Checksums 

I data 693, 89, 823, 651, 623, 41, 7 
85, 635, 712, 257, 5229 

II data 17, 763, 527, 472, 586, 711, 
291, 378, 374, 487, 4598 

21 data 486, 312, 716, 286, 76B, 944 
, 236, 348, 446, 648, 5886 

45 data 385, 841, 76, 945, 719, 161, 

691, 46, 471, 168, 4435 

62 data 358, 723, 686, 792, 153, 314 
, 752, 154, 678, 563, 5885 

84 data 224, 488, 499, 264, 769, 543 
, 683, 787, 327, 98, 4682 

128 data 524, 277, 265, 689, 862, 69 
6, 14, 9, 4, 455, 3795 

284 data 36, 31, 12, 7, 2, 451, 28, 
23, 18, 999, 1687 

215 data 994, 989, 686, 192, 588, 34 

2, 639, 768, 116, 486, 5728 

382 data 886, 688, 941, 8, 317, 785, 

317, 95, 271, 734, 4874 

312 data 293, 568, 678, 269, 89, 382 
, 493, 492, 385, 868, 4421 

323 data 586, 798, 685, 571, 57, 984 
, 688, 358, 256, 341, 5156 

336 data 523, 766, 587, 819, 817, 34 
8, 448, 984, 236, 465, 5985 

358 data 321, 585, 255, 66, 396, 949 
, 91, 471, 218, 268, 3532 

378 data 241, 486, 546, 987, 451, 23 

3, 758, 758, 768, 753, 5821 

484 data 766, 888, 896, 912, 872, 76 
5, 882, 768, 773, 789, 8295 

428 data 548, 99, 138, 187, 514, 181 
, 181, 180, 438, 587, 2885 

442 data 467, 392, 682, 312, 563, 58 

4, 672, 382, 20, 298, 4212 

458 data 796, 262, 242, 224, 972, 41 
8, 28, 232, 692, 928, 4770 

477 data 917, 919, 915, 887, 799, 79 
1, 888, 28, 115, 727, 6826 

588 data 473, 494, 937, 618, 246, 61 
3, 152, 614, 783, 684, 5446 

611 data 558, 254, 3, 138, 799, 253, 

233, 988, 233, 951, 4482 

627 data 482, 369, 536, 893, 722, 8, 

136, 652, 344, 10, 4072 

651 data 96, 88, 233, 151, 288, 488, 

485, 385, 864, 681, 3583 

67B data 236, 862, 845, 452, 71, 17, 

998, 242, 869, 848, 5424 

683 data 481, 183, 536, 883, 441, 23 
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, 999, 832, 14, 347, 4579 

766 data 457, 282, 255, 235, 399, 23 
6, 955, 450, 459, 468, 4188 

738 data 217, 352, 462, 285, 428, 18 

5, 839, 544, 292, 968, 4556 

741 data 575, 821, 58, 548, 672, 542 
, 684, 21, 6, 538, 4377 

758 data 272, 252, 18, 268, 982, 414 
, 483, 224, 587, 583, 3827 

778 data 485, 683, 557, 26, 11, 448, 

88, 873, 854, 531, 4468 

788 data 533, 589, 198, 176, 299, 71 
, 383, 872, 766, 555, 4274 

801 data 936, 634, 692, 132, 729, 78 
1, 554, 336, 98, 79, 4883 

814 data 357, 55, 847, 544, 256, 143 
, 262, 262, 244, 526, 3496 

830 data 525, 445, 486, 374, 234, 37 
8, 553, 576, 542, 221, 4254 

846 data 404, 858, 72, 923, 518, 242 
, 8, 318, 383, 488, 4030 

878 data 686, 878, 277, 278, 527, 67 
, 598, 492, 528, 255, 4586 

911 data 319, 878, 261, 243, 519, 52 

6, 446, 405, 353, 232, 4182 

927 data 377, 447, 573, 722, 252, 47 
4, 521, 647, 327, 321, 4661 

943 data 388, 550, 594, 316, 598, 94 
6, 639, 603, 270, 266, 5170 

962 data 954, 276, 258, 539, 546, 46 

6, 420, 378, 262, 392, 4491 

978 data 467, 588, 742, 268, 9, 83, 
922, 534, 155, 543, 4311 
989 data 461, 347, 341, 231, 531, 72 

4, 495, 292, 543, 660, 4625 

1007 data 434, 749, 191, 519, 406, 7 

01, 465, 821, 819, 972, 6077 

1021 data 647, 281, 349, 665, 697, 3 

07, 292, 930, 92, 747, 5007 

1051 data 987, 13, 713, 206, 692, 77 

5, 88, 542, 619, 112, 4747 

1106 data 149, 687, 103, 619, 295, 4 
60, 285, 882, 962, 705, 5147 

1118 data 291, 744, 749, 747, 737, 7 
42, 759, 768, 773, 771, 7881 

1129 data 720, 733, 730, 719, 723, 7 
20, 566, 690, 339, 246, 6186 

1143 data 893, 649, 852, 543, 628, 1 
13, 886, 686, 578, 646, 6458 

1161 data 926, 738, 147, 289, 62, 48 

4, 48, 488, 488, 643, 4865 

1171 data 793, 392, 71, 641, 122, 67 
7, 383, 20, 100, 670, 3789 

1184 data 690, 230, 574, 568, 600, 8 
28, 300, 543, 660, 213, 5206 

1205 data 456, 189, 538, 545, 717, 5 
62, 588, 707, 471, 841, 5614 

1219 data 835, 397, 463, 448, 300, 1 
97, 809, 279, 876, 417, 5021 

1238 data 457, 473, 794, 58, 560, 94 

2, 780, 765, 597, 118, 5544 

1261 data 273, 967, 35, 715, 579, 68 

5, 999, 953, 484, 599, 6289 

1274 data 131, 787, 4, 498, 77, 596, 

743, 433, 689, 68, 3946 

1302 data 914, 559, 103, 634, 245, 3 
97, 286, 712, 970, 106, 4926 

1312 data 260, 328, 863, 542, 141, 2 
01, 843, 218, 851, 235, 4482 

1325 data 859, 252, 867, 377, 856, 3 
51, 845, 372, 853, 393, 6825 

1335 data 861, 414, 869, 571, 858, 5 
47, 847, 570, 855, 50, 6442 

1348 data 870, 133, 303, 803, 309, 2 
97, 471, 611, 608, 944, 5349 

1366 data 967, 818, 679, 818, 869, 3 
04, 603, 127, 890, 566, 6641 

1400 data 391, 845, 411, 853, 431, 8 



61, 451, 869, 452, 858, 6422 

1410 data 425, 847, 445, 855, 465, 8 
63, 485, 871, 666, 860, 6782 

1428 data 636, 849, 654, 859, 907, 9 
48, 954, 960, 966, 999, 8732 

1435 data 6, 13, 20, 27, 55, 43, 50, 

457, 71, 314, 1056 

1450 data 306, 806, 538, 739, 2, 814 
, 44, 16, 40, 50, 3347 

1460 data 3, 13, 23, 995, 19, 29, 39 
, 340, 645, 753, 2859 

1472 data 768, 717, 588, 978, 26, 95 

7, 457, 668, 877, 896, 6924 

1485 data 4, 71, 777, 674, 784, 687, 

689, 719, 752, 757, 5834 

1495 data 762, 795, 5, 990, 22, 903, 

851, 665, 667, 599, 6259 

1505 data 604, 140, 430, 303, 625, 9 
84, 986, 988, 971, 1, 6032 

1518 data 3, 5, 16, 222, 204, 233, 9 
17, 875, 619, 210, 3304 

1601 data 202, 744, 35, 320, 113, 93 
6, 72, 964, 500, 694, 4580 

1621 data 821, 70, 820, 304, 554, 57 

8, 273, 407, 597, 230, 4654 

1631 data 583, 744, 578, 884, 720, 9 
1, 454, 258, 4, 778, 5094 

1674 data 523, 111, 632, 615, 342, 5 
75, 583, 477, 3, 725, 4586 

1705 data 618, 74, 632, 478, 632, 52 
1, 382, 805, 982, 503, 5627 

1720 data 256, 996, 716, 851, 13, 47 
4, 476, 922, 440, 835, 5979 

1734 data 9, 156, 965, 941, 944, 941 
, 968, 525, 782, 585, 6816 

1745 data 221, 856, 859, 855, 865, 8 
49, 833, 682, 155, 160, 6335 

1755 data 738, 987, 555, 887, 331, 2 
33, 769, 607, 91, 259, 5457 

1768 data 224, 622, 616, 523, 780, 9 
43, 42, 117, 917, 141, 4925 

1786 data 225, 386, 69, 844, 617, 30 
0, 837, 747, 824, 310, 5159 

1806 data 531, 613, 579, 604, 435, 5 
58, 556, 454, 2, 252, 4584 

1818 data 277, 421, 296, 72, 751, 65 

4, 590, 404, 466, 466, 4397 

1829 data 476, 108, 102, 110, 129, 2 
88, 334, 488, 653, 995, 3675 

1843 data 992, 59, 637, 651, 652, 59 
8, 788, 695, 936, 922, 6922 

1859 data 675, 647, 985, 903, 937, 9 
37, 597, 330, 671, 55, 6657 

1873 data 75, 579, 844, 845, 967, 20 

6, 828, 836, 823, 842, 6845 

1884 data 881, 599, 771, 796, 73, 72 
, 796, 575, 968, 388, 5839 
1894 data 853, 887, 315, 16, 924, 19 

5, 949, 47, 16, 89, 4291 

1906 data 888, 317, 875, 136, 171, 1 
8, 298, 337, 312, 871, 4223 

1918 data 200, 608, 705, 607, 310, 5 
04, 99, 883, 312, 870, 5898 

1948 data 541, 85, 124, 655, 618, 77 
8, 89, 275, 129, 899, 4185 

1958 data 84, 584, 933, 983, 324, 68 

7, 144, 926, 518, 947, 6858 

1968 data 374, 87, 918, 53, 88, 273, 

986, 78, 65, 876, 3790 

1982 data 318, 691, 265, 559, 518, 5 
18, 353, 290, 926, 583, 5021 

1993 data 252, 945, 558, 851, 852, 8 
53, 854, 855, 863, 864, 7747 

2127 data 865, 866, 917, 917, 917, 9 
17, 917, 917, 546, 854, 8633 

2151 data 545, 622, 115, 888, 688, 5 
58, 982, 922, 47, 755, 6114 

2505 data 829, 972, 398, 2199 JSf 
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The Spacer 

How to make your hard disk fast again 



by Dave Small, Copyright 1987 



Well, so you're the proud owner of a 
hard disk. Welcome to the club! Isn't it 
great? 

You're amazed by the sheer speed of 
the hard disk. Copy a file to it? Zip. Copy 
a file from the hard disk, to the hard 
disk? Zip, zip. We're talking perfor- 
mance far higher than an IBM. A 200K 
file can be copied in three seconds on 
the ST; it takes ten seconds on a PC. 

But something seems to have hap- 
pened to your hard disk recently. It's— 
heavens!— bogging down. Slooooww. 

In fact, the delays are getting 
ridiculous. You try to copy a file on the 
hard disk, and you get a zip sound, 
then, a slow blink, blink, blink of the 
drive light, and 15 seconds later, the zip 
as the operation completes. 

Well, you've got a problem. In fact, 
we've all got it. It's the dreaded FAT 
Lookup Problem. Let's find out about it, 
and how to fix it. 



SOME TRIVA 

Your floppy disk is composed of 720 
512-byte sectors. Oddly enough, the sec- 
tors are numbered 1-720. (If you go 
double-sided, make that 1-1440). 720 
sectors at 512 bytes per sector is 
360,000 bytes per side of the disk; that's 
where your ST's disk size comes from. 

Now, a hard disk is just like a floppy 
disk in that there are a bunch of 
512-byte sectors. However the quantity 
is much larger. A 5-megabyte hard disk 
has 10,000 sectors! Your standard Atari 
SH204, a 20-megabyte unit, has 40,000 



sectors on it. 

The operating system worries about 
splitting up these individual sectors into 
files, subdirectories, and so forth. It 
keeps a table, called a File Allocation Ta- 
ble, which is a map of all the sectors. It 
marks each sector as used, unused, or 
bad. 

Unfortunately, the folks who wrote 
TOS (The Operating System) made a lit- 
tle mistake before committing it ir- 
revocably to ROM: the routine that 
processes the FAT is quite slow. In 
specific, scanning a FAT for an "open" 
sector to write to is extremely slow. You 
do this scan anytime you write some- 
thing new to the disk; the operating sys- 
tem is finding free sectors to write to. 

It was a natural mistake. Working 
with floppy disks, they never noticed 
the speed problem. There's only 720 or 
so sectors on a floppy, and the FAT 
search problem wasn't noticeable. In 
fact, until you get over a megabyte of 
data on the storage media, you don't no- 
tice it at all. 

However, hard disk owners tend to 
collect lots of data, and then the 
problems become extremely evident. 
Let's go through a sample copy. Assume 
you have a hard disk partitioned into 
four 5-megabyte parts, a very common 
thing to do. You're copying a file from 
disk C to disk F. Assume also that disk 
F is rather full. 

You drag the icon, and let go. First, 
you notice the drive light go on and the 
head move; it's pulling the file off drive 
C. Then it begins to write. 
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Slowly, very slowly, it reads in the 
FAT for the disk F. It's looking for a 
place to put the data it just read. You'll 
see the drive light blinking— and any- 
time the ST goes to slow the hard disk 
light has time to go out, you're in trou- 
ble. Finally, it finds a home for the data. 
Zip! The data's written. 

Of course, it took a while. 

If you think I'm kidding, let's look at 
the times to duplicate a 200K file on the 
hard disk, only varying how much data 
is out there first. 

Table h Disk timings. Duplicating a 
200K file. 

Disk empty: under 3 sec. 
Disk 5 megabytes: 30 sec. 
Disk 10 megabytes: 45 sec. 
Disk 15 megabytes: 63 sec. 

This is bad. All that extra time is 
spent diddling with the FAT. 

In contrast, an IBM PC takes around 
ten seconds to duplicate a 200K file, 
regardless of how full the disk is ; 
they've got a good fast FAT search al- 
gorithm, so the overhead doesn't slow 
things down. [Why ten] seconds? Main- 
ly, a slower hard disk and slower 
processor. 

If you're using something like Al- 
cyon C, which creates six temporary 
files during the compile/assembly 
process (No? Look at AS68 closely. It 
takes three by itself!) you're going to be 
old by the time it's done. And why was 
it you bought a hard disk? Speed? 

Those of you familiar with my style 
probably think I have some magic desk 
accessory or program to fix this. Alas, 
I don't. The problem is deeply rooted in 
the slippery, slimy entrails of TOS, and 
like any digestive system problem, it's 
hell to diagnose and fix. It's all in ROM, 
just to make it worse. 

I do, however, have a technique to 
speed your hard disk back up when you 
have a lot of data out there: It's called 
"spacing." I believe that all of you suffer- 
ing from the I ID slowdown will benefit 
a lot from this technique. 

Let's look at the FAT process again. 
The slowdown occurs when the operat- 
ing system is looking over a huge disk, 
with thousands of sectors, trying to find 
the first sectors that are free to be writ- 
ten to. The problem is only in writing, 
not in reading. 

On a hard disk, the first data written 



to it (the first file copied to it after for- 
matting) is written in the first sectors 
(e.g., sectors 1-xxx of the 40,000 availa- 
ble). The next file goes in the next sec- 
tor, and so on. 

The farther we get away from the 
start of the hard disk, the longer the 
hard-disk driver (FAT) takes to do the 
write. So, the first conclusion is, keep 
your disk nearly empty if you want it 
to stay fast. 

This is fine, but there are those of us 
who want to store lots on our hard disk 
and still have it move quickly. I mean, 
heck, the Alcyon C compiler takes about 
a megabyte, what with all its support 
files. And what about all those good 
downloads? NEOchrome files? 

For those of you that want lots of data 
and peppy performance, we have the 
spacer technique. 

Let's imagine how the hard disk looks 
after you've copied, typically, the Al- 
cyon C compiler to it (which, with all its 
subfiles, takes up lots of room). Let's fur- 
ther assume a 5-megabyte partition (seg- 
ment of hard disk). 

Sector 1 (start of 5-megabyte area) 
Alcyon C and files: comprise about 
1-megabyte 
Section 2,000 
Empty area 

Sector 10,000 (end of 5-megabyte area) 

Now if you go do a compile, all those 
temporary files, and all your editing, 
gets done starting at sector 2,000. Every 
time you write to the disk, you have to 
sit and wait while the ST hunts through 
the first used 2,000 sectors. That will 
bog you down. 

Most people's hard disks look like 
this. Data gets put on them willy-nilly, 
whenever it's available, in the first open 
sector. 

Instead, let's do something different. 
Before copying anything to the hard 
disk— when it's new, freshly formatted 
and zeroed, let's put a huge file on the 
hard disk called a "spacer." One easy 
way to make a spacer is to create a 
folder and fill it with long files. I use a 
listing of the Magic Sac, which is 
about 500K. However, feel free to use 
any long flies that come to mind. 

Let's make our spacer 4 megabytes 
long, and copy it to the hard disk. It 
looks like this now: 

Sector 1 (start of 5-megbyte area) 
Spacer folder files (temporary, 4 
megabytes) 



Sector 8,000 
Empty area 

Sector 10,000 (end of 5-megabyte area) 

Only, now copy the Alcyon files to the 
hard disk. Of course, this is going to 
take awhile, because they're so far away 
from the start of the hard disk, so go get 
some coffee while it works: 

Sector 1 (start of 5-megabyte area) 
Spacer files (temporary, 4 megabytes) 
Sector 8,000 

Alcyon C (1 megabyte or so) 

Sector 10,000 (end of 5-megabyte area) 

Okay, your hard disk is now full. 

Go delete the spacer. The Alycon C 
files aren't going to move, which is one 
of the secrets of this technique, so we 
have: 

Sector 1 (start of 5-megabyte area) 
Empty space 
Sector 8,000 

Alcyon C (1 megabyte or so) 

Sector 10,000 (end of 5-megabyte area) 

Now we're getting somewhere. When 
the operating system makes a new, tem- 
porary file, it doesn't have to search 
very far: There's a big empty area at the 
beginning of the disk! In tests I've run, 
this has increased the performance of 
compilers by 300%. 

When you think about it, how many 
of the things you put on the hard disk 
are ever modified? If you're like me, 
there's piles of utilities and the like that 
never get changed. With the Spacer 
technique, you can put them on the end 
of the hard disk, where they won't be 
slowing down your work. 

The amount to space your files across 
the disk is strictly up to you. I'd go at 
least halfway across the hard disk, but 
it's up to you. Again, the idea is to first 
use up the "fast" part of the hard disk 
with a spacer, which forces the follow- 
ing files to be written in the "slow" part. 
When you get rid of the spacer, you'll 
do all your work on a remarkably fast 
hard disk. 

Won't your utilities slow down? 

No. Remember, the bug is only while 
writing to the disk, not while reading. 
All you do with a utility is read it in (like 
the C compiler code). Temporary files 
and such are what you're concerned 
with. 

Periodically, as things slow down, you 
may need to go respacer the hard disk 
to get your performance back, ff 
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PROGRAMMING 



by Clayton Walnum 

Everyone who's tired of studying 
GEM's windows, please raise your 
hand. Yeah, that's what I thought. 
Okay, it's time to take up a new subject, 
something that, though it'll give you a 
lot of information on how your com- 
puter works, won't give you a headache 
trying to understand it. 

One of the more useful things about 
the ST is the ability to have many 
screens of data in memory at once and 
flip between them as you like. I thought 
this would be a good subject to tackle, 
since it enables us to not only see how 
we can accomplish "screen flipping" 
(which is really a simple process), but 
how to apply some of the other tech- 
niques we've learned, such as the 
programming of file selector boxes. 
We'll also take a look at some new in- 
formation, such as the DEGAS picture 
file format. 

Type in this month's listing and com- 
pile it. Note that the program was de- 
veloped using the Megamax C com- 
piler. If you have a different compiler, 
you may need to make some small 
changes to the code. Once you've got 
the program compiled and linked, go 
ahead and run it. 

What we're going to do is load two 
DEGAS format pictures into memory, 
and then use an alert box to choose 
which picture to view. We'll have to tell 
the program which flies to load, so the 
first thing the program will do is bring 
up a file selector box. Use it in the nor- 
mal way to select two DEGAS pictures 
for loading. 

While you're doing this, keep in 
mind that the program presented here 
is a very stripped-down model. In other 
words, it doesn't incorporate much in 
the way of error checking. In fact, it'll 
let you load just about any type of file 
into memory, whether it's DEGAS or 
not. So do your own error checking, 
and make sure you're selecting the 



right type of file. 

If you click on the file-selector box's 
Cancel button for either picture, or if 
the program gets a file error, you'll be 
returned to the desktop. 

Once you get two files loaded, an alert 
box with three buttons will appear. 
Clicking on the first button will cause 
the first loaded picture to be displayed. 
Clicking on the second button will 
show the second picture. The Quit but- 
ton should be used to leave the pro- 
gram and return to the desktop. Once 
a picture is displayed on the screen, 
clicking the left button will bring the 
alert box back, allowing you to make 
another choice or quit the program. 

Hey! That space is reserved! 

The first step is getting our picture 

Keep in mind 
that the 
program 
presented 
here is a 
very 
stripped- 
down model . 

files loaded into the computer is figur- 
ing out where we're going to store 
them. We need a lot of space — 32K for 
each picture — and we have to make 
sure that, wherever we store the pic- 
ture information, it doesn't get in the 
way of our program or its data. Also, 
since we're going to be displaying a 
couple of different screens, we have to 
make sure we store the address of the 
original screen, as well as its color 
palette, so that we can restore it when 
the program's finished. 
Take a look at the function 

init screens() in Listing 1. The first 

thing we do here is store the desktop's 
color palette with the line: 

for tx=8; x<16; 
desk_palette [x++] 
= Setcolortx, -1JJ ; 



The function Setcolor() is an XBIOS 
function and is defined in the OS- 
BIND. II file. This function requires two 
integers as arguments. The first is the 
index of the color you want to change 
(from 0 to 15), and the second is the 
color to change it to. 

Colors on the ST are formed by mix- 
ing the correct proportions of red, 
green and blue, each of which can have 
a value from 0 (minimum) to 7 (maxi- 
mum). The color value for blue is 
placed in the first nibble (four bits) of 
the integer; the value for green is 
placed in the second nibble; and the 
value for the red is placed in the third. 
This works out well in hexadecimal: 
0x007 is the brightest blue; 0x070 is 
the brightest green; and 0x700 is the 
brightest red. White is all the values at 
their maximum (0x777), while black is 
formed by setting all colors to the mini- 
mum 0x000). By combining the three 
basic colors in varying intensities, we 
can conjure up any of the ST's 512 pos- 
sible colors. 

But all that is besides the point (go 
ahead and boo ; I deserve it). We don't 
want to change the colors (at least, not 
yet); we want to know what value 
they're currently set at, so we can store 
them for later retrieval. One thing I 
didn't tell you about the Setcolor() 
function is that it always returns a 
color's previous setting (its color value 
before we changed it). If we make the 
second argument a negative number, 
it won't change the color register at all; 
it'll just return the color's setting. 

Now you can see how the above code 
segment works. We use a for loop to 
step through all 16 possible elements 
of the color palette, calling Setcolor 
() in each iteration with a color value 
of -1, in order to have the current color 
returned to us. Each of these colors is 

stored in the array desk palettef ] 

where they'll be when we're ready to 
restore the desktop's colors. 

Now that we've gotten that taken 
care of, we have to store the address of 
the desktop's screen (we do want to get 
back there eventually, you know). This 
line takes care of that: 

scrn = Physbaset); 

Here, the variable scrn is a long integer 
that'll hold the address returned from 
Physbase() The function Phys- 
baseQ returns the address of the 
physical screen, the area of memory 
currently displayed on your monitor. 
The function Logbase() returns the 
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address of the logical screen, an area 
of memory where all output to the 
screen is to go. 

In most cases, the physical and logi- 
cal screens are in the same location. 
For example, as I'm writing this article, 
I can see the new text I'm typing ap- 
pearing on the screen. That means that 
the displayed screen and the one the 
program is sending text to are at the 
same address. Sometimes, though, you 
may find it handy to direct data to a 
different place in memory, so you can 
do the screen updating "behind the 
user's back." Once the logical screen 
has been set up the way you want it, 
you can simply flip to it, creating the 
illusion of the screen being intently up- 
dated. We'll see how all this works a lit- 
tle later on. 

Now that we know where our physi- 
cal screen is, we're ready to allocate 
some memory for a couple of logical 
screens. You allowed only one physical 
screen, but you can have as many logi- 
cal screens as you can store in mem- 
ory. In the function init screens}) 

we set up a while loop that first allo- 
cates a block of screen memory, then 
calls a function to read the picture data 
into it. To allocate a block of memory, 
we use the call: 

addr = Nal loc tbytes) ; 

Here, the pointer addr will hold the 
address of the block of memory, and 
the long integer bytes is the number 
of bytes you wish to reserve. This func- 
tion returns a 0 if the amount of 
memory you've requested isn't availa- 
ble. One variation on the Malloc() call, 
making bytes equal to -JL, will return 
the total amount of memory available. 

You've probably noticed, though, that 
our call to Malloc() in Listing 1 looks 
quite a bit more complex: 

pictx] = CMalloc (32768L) & 

8xffffff88 ) + 8x0188; 

First, even though pic[x] doesn't 
look like a pointer, it is. In fact, pic[] 
is an array of pointers (actually, long 
integers, but for our use that amounts 
to the same thing). For programming 
purposes, it's very convenient to store 
the addresses of our screens in an ar- 
ray, so that we can get at them easily 
with some sort of loop. 

Next comes that strange looking 
Malloc() call. It looks strange to you 
because there's one little detail I've yet 
to mention, the fact that the ST's 
screen memory must always start on 



a 256-byte boundary. And, since Mal- 
loc() doesn't know or care about this 
little requirement, it's up to us to 
smooth things over. 

The first step in getting to a safe 
256-byte boundary is to use C's AND 
operator to mask off the eight right- 
most bits of the address, using the hex 
value OxFFFFFFOO as our mask. This 
value has every bit set except the right- 
most eight. The AND operator com- 
pares the bits of two values, returning 
a true (1) when both bits are on and a 
false (0) when either or both the bits are 
off. What that means for us is that ev- 
ery bit we have off in the mask will 
result in a 0 in the bit it's being AND- 
ed with. Let's say the address returned 
from Malloc() was 0x0034CC3E2. Af- 
ter ANDing it with our mask, we'd have 
0x034CC300, which is an address on a 
256-byte boundary. 

But even though we're now on the 
boundary we wanted, it's not a safe 
boundary. Why? Because the address 
we have now is lower than the one 
returned from Malloc() We're no 
longer in the area we just reserved; 
we're actually before it. If we try to load 
data there, we'll probably end up 
clomping all over our program — and 
get a delightful string of bombs up on 
the screen. 

That's why, after completing the AND 
operation, we add 0x00000100 (256 
decimal) to the resultant address. That 
pushes it back into our reserved area. 

"Ah!" you cry in that smug manner 
you use when you think you've caught 
the professor with his foot in it. "If 
we're pushing the address forward, 
doesn't that mean that, when we load 
our picture data, the last few bytes will 
be placed outside the reserved area, be- 
yond the other end?" 

Nope. You see, we've reserved 32768 
bytes (that's a full 32K), and we only 
really need 32000 bytes for our picture 
data. When people tell you that screen 
memory on the ST is 32K, they're not 
telling you the whole truth. It's actual- 
ly a bit short of a full 32K. We just like 
to round it off when we speak. (You 
ever hear people refer to the SF314 
disk drive as a one-meg drive, even 
though you can only story 720,000 
bytes on the disk? Same idea.) 

One thing we do have to watch out 
for, though, is how we handle any sub- 
sequent calls to MallocQ because it 
doesn't know we've finagled the ad- 
dress it gave us the first time around. 
The next time we allocate some 



memory, we have to remember to add 
the same amount to the returned ad- 
dress, or we're sure to make digital 
footprints in the previous areas. And 
digital footprints often result in the Big 
Kablooey. (In our case, since we're us- 
ing those areas only for a screen dis- 
play, we'd simply end up with some 
funny looking pictures.) 

Okay, we've got the memory we need 
to store our pictures. Now let's think 
about how we're going to load them. 
The first step is to get the picture's file- 
name, and the obvious way to do that 
is with OEM's handy file selector box. 
Included in Listing 1 is a function 
called select f ile(). This is a gener- 
ic file selector box routine that I came 
up with that you can use in your own 
prograrns. It handles some of the 
minor details for you, allowing you to 
just call a file selector box and have the 
complete filename (including the path) 
returned to you. (You're welcome.) 

If you look at the function 
get pic(), you'll see how we get start- 
ed. First, because it's required by 

select file(), we have to come up 

with a default filename. This will be 
tacked on to the end of the pathname 
field in the file selector box, and allow- 
ing us to narrow the number of files 
shown when the box first comes up. In 
our example, we start with the string 
" * .PI" then finish the default name by 
adding the proper DEGAS resolution 
indicator. Adding the ASCII value of 
"1" to the value returned from 
Getrez() performs that trick. 

Our file selector function, select 

file(), returns the complete chosen 
filename and the button that was 
clicked to exit the file selector box. The 
call to the function looks like this-. 

select.f iletpath, f ile, 
default, flag); 

Here, path is a pointer to a 64-byte 
character array where the function vf\\\ 
store the completed filename. The 
pointer file is the address of a 13-byte 
character array that'll hold the select- 
ed filename after the call to 

fsel inputQ. You may also, before 

the function call, store a filename here 
that you want to appear in the filename 
Held of the file selector box. The pointer 
default contains the address of a 
string containing the text you want ad- 
ded to the selector box's pathname 
field. And finally, flag is a Boolean 
value that tells the function whether 
you want the string pointed to by file 
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to appear in the file-selector box's file 
field. 

It sounds a little complicated at first, 
but I've found that using this function 
is a lot easier than trying to remember 
how to handle the file-selector box each 
time I need it. 

As I mentioned before, select 

file() returns the value of the file- 
selector button that was clicked. 
Strangely enough (or perhaps it was 
done purposely), these values also cor- 
respond to obvious Boolean values; the 
Cancel button returns 0, and the OK 
button returns 1. In the function 

get pic(), we use this returned value 

as a Boolean to evaluate an if state- 
ment. In other words, if the user clicks 
on the file selector box's Cancel button 
for either of the two files we're going 
to be loading, we'll know not to read 
the file and instead exit the program. 

If the user clicks the file selector's OK 

button, we call the function read 

degas () to attempt to load the file 
chosen. If the file loads all right, this 
function will return a value of TRUE. 
If an error is encountered (maybe the 
file doesn't exist), it returns a value of 
FALSE. We use this returned value in 
another if statement to determine 
whether we should continue or return 
to the desktop. In a full-scale applica- 
tion program, you would want to give 
the user a message if you ran into an 
error, but for the sake of brevity, we've 
kept things to a minimum in the exam- 
ple program. 

Turn your attention now to 
read degas(). It's here that we ac- 
tually read the selected picture file into 
memory. This function needs to know 
which picture we're loading and the 
complete filename. The first thing we 
must do is open the file, but we have 
to make sure we open it to read bi- 
nary. We covered the open() func- 
tion way back in Issue 4, but we didn't 

talk about the 0 BINARY flag. When 

we open the file with this flag (it's de- 
fined at the top of the listing as 8192), 
we're telling the system that we want 
the file read from the disk in an un- 
translated form, as a continuous block 
of data, rather than a series of lines 
ending with carriage returns and line 
feeds. 

Before we go any further, we need to 
discuss the format in which DEGAS 
pictures (the unsqueezed variety) are 
saved to disk. If you've ever looked at 
a disk directory containing these pic- 
ture files, you've undoubtedly noticed 



that they are 32034 bytes. In order to 
get the picture up on the screen 
properly, we have to know what each 
of these bytes is. 

The first two bytes of a DEGAS file in- 
dicate the picture's resolution. It's in- 
terpreted as a word value: 0x0000, 
0x0001 or 0x0002, for low, medium or 
high resolution, respectively. Normal- 
ly, we'd want to check the resolution 
of the picture against the computer's 
current resolution, to make sure they 
aren't different, and if they are, give the 
user an error message. But, as I said be- 
fore, for the sake of brevity, we're go- 
ing to do things quick and sloppy and 
just throw away those two bytes after 
we've read them. 

The next 32 bytes (16 words) are the 
picture's color palette. That we don't 
want to throw away; we want to read 
it into the array we've set up for stor- 
ing this information. 

Finally, the last 32000 bytes are the 
actual picture data. We read that infor- 
mation into the area of memory start- 
ing at the address stored in the ap- 
propriate element of the pic[] array. 

Now that we've got all the data read, 
we close the file and return a value of 
TRUE to the calling function. Notice 

that, in the function read degas() 

we're using the value returned from 
the openQ function in an if state- 
ment. Doing this makes sure, in the 
case of a file error, that we skip over all 
the subsequent file handling code, and 
just return from the function a value 
of FALSE. 

Once we get two picture files loaded 
okay, program execution gets turned 

over to the function flip screens)) 

where we get a chance to actually view 
the pictures. We begin by calling up an 
alert box with three buttons, one but- 
ton for each picture plus a Quit button. 
We use the value returned from the 
alert box as an index into the pic[] ar- 
ray, where the pointers to the screens 
are stored. To flip between the differ- 
ent screens, we use the call: 

Setscreen (log, phys, res) ; 

Here, log is the address of the logical 
screen, phys is the address of the 
physical screen, and res is the screen 
resolution we want to switch to. If we 
don't want to switch screen resolu- 
tions, we just give res a negative value. 
In fact, all parameters with a negative 
value will be ignored. 

In most cases, you would set both the 
logical and physical screen to the same 



address. As for the resolution, you'll 
almost always want to leave it un- 
changed (use a negative value) because 
GEM isn't ever informed of resolution 
changes, and that little bit of ignorance 
on its part can lead to some pretty 
nasty complications. 

Exactly flipping the screen, we wait 
for a mouse button click using a call to 

evnt button (), after which we bring 

up the alert box to get another choice. 
We keep displaying the selected pic- 
ture until the Quit button is clicked. 
Then we close things up and return to 
the desktop. 

Putting it back where we found it 

But we can't just go blithely on our 
way, returning to the desktop by just 
closing the virtual workstation and 

calling appl exit() as we've gotten 

used to doing. Nosiree. We've got some 
cleaning up to do first. We've allocat- 
ed a bunch of memory for our picture 
files, and before we leave, we have to 
get it back. Not a tough thing to do. The 
following call will return a block of 
memory (one that was allocated with 
Malloc() to the system: 

Mfree (adr) ; 

The pointer adr is the address of the 
block we want to de-allocate. You need 
to make a separate call to Mf ree() for 
each block allocated, and you must 
return the blocks in the reverse order 
you allocated them. 

Once we've returned all the memory 
to the system, we can exit the program 
in the usual manner. You can see all 
this being done in Listing 1 in the func- 
tion clean up(). 

The whoops department 

I was going over a couple of the old 
installments of C-manship the other 
day and found that I had left something 
out of our discussion of resource files. 
So let's correct that oversight, shall we? 

When you load a resource file, it 
takes up a certain amount of memory, 
and, just like the picture files we were 
working with this month, that memory 
should be returned to the system be- 
fore we exit our program. The call to 
free the memory allocated for a 
resource file is.- 

rsrc_free () ; 

You should use this call (whenever 
you've loaded a file with rsrc load() 

before you exit a program or before you 
attempt to load a different resource file. 
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/ XXXXXXXXXXXMMXXXXXXXXXXXXXXXXXXMMMXXXXXXXXXXXXX / 

/* C-nanship, Listing 1 */ 

/* ST-Log »28 «/ 

/* Developed with Meganax C */ 

/ XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX / 



ttinclude <osbind.h> 

ttdefine TRUE 1 
ttdefine FALSE 6 
ttdefine 0_BINARY 8192 
ttdefine QUIT 3 
ttdefine LEFT_BUTTOH 1 
ttdefine DOWN 1 

/* The usual required GEN global arrays */ 
int work-in till, 

work_out [571, 

pxyarrag [181 , 

contrl [121, 

intin[128], 

ptsin[1281, 

int out [1283, 

ptsout[128] ; 

/* Global variables */ 
int handle, dun; 

long pic [2], /* Pointers to logical screens. */ 
scrn; /* Pointer to physical screen. */ 

int desk_palette[16] ; /* Desktop color palette, 
int pic_palette[2] [16] ; /* Picture color palettes, 



*/ 



nain 



() 



appl_init () ; 
open_vwork (1 ; 
do_pictures (1 ; 
clean_up C) S 
appl.exit (); 



/* Initialize application. */ 

/* Set up workstation. #/ 

/* Go do the picture stuff. */ 

/* Get everything back to nornal. */ 

/* Back to the desktop. */ 



open_vwork C) 
t 

int i ; 

/* Get graphics handle, initialize the GEM arrays and open */ 
/* a virtual workstation. »/ 

handle = graf-handle ( &dun, &dun, &dun, &dun) ; 
for ( i=8; i<18; work_inti++] =11; 
work_in[18] = 2; 

v.opnvwk t work-in, &handle, work.out ); 



do_pictures () 
{ 

If the pictures are loaded okay, */ 
/» then allow user to view then. */ 

if C init_screens () ) 
flip-screens () ; 



init_screens (1 
{ 

int x, /* Index variable, 

okay; /* File load flag. 



*/ 
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/* Store the desktop's color palette. */ 

for t x=8; x<16; desk_palette[x++]=Setcolor Cx, -11 J J 

/* Store the address of the desktop's screen. */ 
scrn = Physbase t) ; 

/* Reserve nenory for pictures and load then */ 
/* into the allotted space, storing pointers */ 
✓* to then in the pic □ array. */ 

okay = TRUE; 



x = 8; 

while C (okay == TRUE) && Cx < 2) 1 C 

picCxl = ( Malloc C32768LJ & 8xffffff08 ) + 8x8180; 
okay - get-pic ( x++ J J 

> 

return ( okay ) ; 



flip_screens tJ 
{ 

int choice; /* Button nunber clicked in alert box. */ 
choice = 1; 

/* View pictures until QUIT button is clicked. »/ 
while ( choice != QUIT ) t 

/* Call up alert box to get user's picture choice. «/ 

choice = forn_alert ( 8, " [21 [Choose picture to view] [One | Two | Quit] " 

/* Me only want to show a picture if the */ 
/* QUIT button hasn't been clicked. */ 

if t choice != QUIT ) C 

/* Set the screen to show the chosen picture. */ 
Setscreen ( pic [choice-1], pic [choice-1] , -1 I; 

/* Set the palette to the picture's settings. */ 
Setpallete ( &pic_palette [choice-1] [8] I) 

Wait for a button click. */ 
evnt_button ( 1, LEFT-BUTTOH, DOWN, *dun, «dun, *dun, &dun ) ; 

> 

> 

} 



get_pic ( nun J 

int nun; /* Nunber of picture to load. */ 

{ 

char pathE64] / /* Storage for picture's pathnane. */ 
file[13], /* Storage for picture's filenane. */ 
pictype[61; /* Storage for default picture filenane. */ 

/* Build default picture filenane. */ 
strcpy ( pictype, "*.PI " ); 
pictypet4] = Getrez () ♦ '1'; 

/* If file selector CANCEL button wasn't clicked, */ 
/* read the chosen DEGAS file into nenory. If an */ 
/* error is returned, the progran will abort. «/ 

if ( select-file ( path, file, pictype, FALSE ) ) 
if ( read_degas ( nun, path ) 1 

return ( TRUE ) ; 
else 

return ( FALSE II 

else 

return ( FALSE 1J 

} 



read-degas ( nun, pathnane ) 

int nun; /* Picture nunber to read. */ 

char wpathnane; /» Picture's pathnane. */ 
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int f_h, /* File handle. */ 
buf [IB! ; /* Tenp buffer for unused bytes. */ 

/* Process file only if no error is returned when opening. */ 
if ( tf_h = open ( pathnane, B_BINARY J) != -1 ) { 

/* First two bytes is resolution data. */ 
read ( f_h, buf, 2 ); 

/* Next 32 bytes (16 words) is the color palette. */ 
read ( f_h, &pic_palette [nun] [0] , 32 }J 

/* Finally, we have 32K of picture data. */ 
read ( f_h, pic [nun], 32688 ii 

/* Close file and tell calling function */ 
/* that everything went all right. */ 
close ( f_h ); 
return ( TRUE J J 

> 

/* In case of error opening the file. */ 
else 

return C FALSE I J 



select-file ( path, fnne, deflt, display) 

char *path, /* Address for path storage. 

*fnne, /* Address for filenane storage. */ 
wdeflt; /* Address of default filenane. */ 

int display; /* Display default filenane? */ 

€ 

int x, /* Loop variable. »/ 

choice, /* Button clicked fron file selector box. */ 
len; /* String length. */ 

char ch; /* Tenp character storage. */ 

/* Clear filenane string if not to be displayed. */ 
if ( display == FALSE ) 

for ( x=8; x<13; fnne[x++] = 'SB' ); 

/* Build file selector box pathnane. */ 
Dgetpath t path, 6 ) i 
len = strlen ( path ); 
path[lenl = 'W'J 

strcpy ( &path[ len + 1 ], deflt )J 

/* Call up file selector box to get user's choice. */ 
fsel-input ( path, fnne, &choice ); 

/* Find last significant character in pathnane in */ 
/* order to delete the filenane portion of the path. */ 



len = strlen ( path ); 
x = len-l; 

while ( pathtxl != 'W && pathtx] Is 

~x; 

strcpy ( &path[x+l], fnne ll 
return ( choice )J 



&& x > 8 ) 



c lean-up () 
[ 

/* Setscreen back to desktop. */ 
Setscreen ( scrn, scrn, -1 ); 

/* Restore original color palette. */ 
Setpallete ( desk_palette }J 



/* Return the reserved nenory back to the systen. */ 
Mfree ( pic 111 tl 
hfree C pic [8] J J 

/* Close virtual workstation. */ 
v.clsvwk () ; 
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Smart 
Watch 



Michigan Software 
43345 Grand River 
Novi, Michigan 48050 
(313) 348-4477 
$59.95 (retail) 



Michigan Software's installation in- 
structions are attached for your 
reference. 



by E.H. Wysocki 

The Smart Watch, a real-time 
clock module manufactured and dis- 
tributed by Michigan Software, is a use- 
ful addition to the Atari 520ST. I re- 
cently purchased and installed this en- 
hancement, and though the module 
works as advertised, I would give the 
following caveats to anyone consider- 
ing its purchase and installation: The 
instructions packaged with the module 
are grossly inadequate to properly in- 
stall the module (unless the buyer regu- 
larly works on Atari STs), and the mod- 
ule cannot be installed into a machine 
containing a RAM update. 

The Smart Watch module is built in 
a modified 28-pin IC socket. The sock- 
et contains a circuit board and an IC 
chip. The bottom of the socket is pot- 
ted with a black compound to seal the 
unit. The module comes with a 3.5-inch 
disk containing the necessary soft- 
ware, and three sheets of paper claim- 
ing to contain installation instructions. 

Of the three sheets of paper, the first 
contains the product pitch and a 
90-day limited warranty. The second 
sheet contains oversimplified installa- 
tion instructions and a board diagram. 
The third describes software 
installation. 

The installation instructions can be 
summed up as "crude." Unless the per- 
son installing the unit has had his ST 
apart before, it is likely that he will 
either be unsuccessful in his attempt 
to install the unit, or he will damage his 
machine by forcing it apart. To quote 
the instructions, "You will need a Phil- 
lips screwdriver to gain access to your 
main Mother Board of the 520ST; there 
are six screws that hold down the cover 
and additional screws that hold down 
the metal shielding plate. This plate 
must be removed as well." 

The instructions neither mention 
removing the keyboard nor provide 
any information as to its proper 
removal. There is also no men- 
tion of the metal "twist-tabs" that retain 
the RF shield, let alone the fact that on 
early 520STs, the shield is soldered 
closed in two places. 

I found the software installation sim- 
ple and straightforward, except for the 
part about putting the clock reading 
program into an "Auto Folder." The in- 



structions do not mention how one cre- 
ates a folder and names it "AUTO." 
Your machine will recognize it as a run- 
first file and will automatically boot it 
on start-up. 

A consideration that neither the ad- 
vertising nor the literature packaged 
with the Smart Watch module men- 
tions is the fact that if you intend to in- 
crease (or have already increased) your 
machine's RAM by using one of the 
commercial RAM updates (i.e., EASY ST 
RAM, etc.), you will have to choose be- 
tween a clock or RAM. Because of space 
limitations under the metal shield, 
both modules will not fit. If this is the 
case, my suggestion would be to invest 
in a clock that would fit into the car- 
tridge slot. Or, if you would prefer not 
to take your ST apart and peer into its 
brains, the cartridge slot type of clock 
would be an excellent alternative. 

I am unable to offer an opinion as to 
the type of support that Michigan Soft- 
ware provides. On the third page of 
their instructions they state, "Should 
you still run into problems you may 
receive assistance by calling us at 
313-348-4477." I attempted to contact 
their office at least five times in one 
week, at various times of the morning 
and afternoon. No one answered the 
telephone. 

In conclusion, the Smart Watch does 
what the literature and advertising 
says it will do — it eliminates the need 
to set the date and time each time you 
start up your machine. However, the 
installation instructions provided with 
the module are inadequate unless the 
purchaser is experienced in taking the 
machine apart to reach its Mother 
Board. In addition, anyone considering 
this enhancement should also consider 
whether the clock module is more im- 
portant than increased memory 
through a RAM update. 

Edward Wysocki is an engineer 
with over ten years of experience in 
machinery design and construction. 
He has worked primarily within the 
plastics industry, currently working 
at a Grand Rapids, Michigan, firm 
that manufactures plastic medical 
devices. He owns a 520ST for per- 
sonal use. Though he has added 
memory enhancements, a ROM up- 
date, and built custom cables for the 
520, his experience with computers 
has been primarily within an indus- 
trial setting (i.e., process controllers, 
machine-computer interfaces), jgr 
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ST Sound 
Digitizer 

Navarone Industries 
1043 Stierlin Road 
Suite 201 

Mountain View, CA 94040 
(415) 624-6545 

Medium or High Resolution 
$139.95 

by Andy Eddy 

With the memory capacity, speed 
and power of the ST, many tasks that 
were previously delegated strictly to 
large-scale computer systems are cross- 
ing over to this "side of the tracks." 
Software for CAD/CAM/CAE (Computer 
Aided Design/Modeling/Engineering), 
high-quality graphics and animation, 
and digitizing (both video and audio) 
are appearing in great numbers for 
Atari users. 



Digitized sound samples— such as 
those that appear at key moments in 
Firebird Software's Starglider as 

well as many new entertainment 
releases for the ST— involve reading 
the analog input signal and converting 
the voltage level to numbers for 
storage, enhancement and playback by 
the computer. This is the same technol- 
ogy behind compact disks , though CDs 
are a much better medium for large 
storage of data. That's the problem with 
digitizing: For a good quality reproduc- 
tion, you have to have a lot of memory 
for your sample. The more frequently 
your sound is sampled, the better the 
replication. 

Navarone has licensed the Hippo 
Sound Digitizer from the now- 
defunct Hippopotamus Software, and 
they've got a pretty good product on 
their hands. It allows a sampling fre- 
quency between 1 KHz and 64 KHz (be- 
tween 1,000 and 64,000 samples per se- 
cond), the high number being the 
highest quality "recording." Of course, 
as we said earlier, on a 1040ST (with 1 
megabyte of RAM) you are limited to an 
approximately 12-second sample at 64 
KHz, but that figure will increase with 
a lowered sample rate; size is a trade- 
off for quality. 

The cartridge that plugs into the ST 
cartridge port is exactly the same as 
Navarone's video digitizer and clock 
cart in size; they use the same casing 
for all their hardware add-ons to trim 
production costs. To suit its electronic 
requirements it contains two 1/8-inch 
phone jacks for Line In and Line Out, 
as well as two thumb wheel potentio- 
meters for adjusting those levels. These 
are best set-up by watching the wave- 
form on the real-time O-Scope (Oscil- 
loscope) display, selected from the 
menu bar at the screen bottom. 

On top of that, you'll have to equip 
yourself with a playback source (like an 
amplifier or stereo system), a micro- 
phone (if you want to record sounds or 
voices) and cables (one cable from your 
input source and one for your output 
to your playback device), because the 
package doesn't include them. 

Conveniently, the manual briefly 
describes various microphones, adap- 
ters and cables that are available, along 
with their Radio Shack part numbers. 



The ST Sound Digitizer soft- 
ware—which runs in either medium or 
high resolution— has two screens other 
than the above-mentioned O-Scope dis- 
play: the Rack screen (which we'll get 
to later) and the Command screen, 
which is where the majority of the 
work is accomplished. Here you set the 
size of the sample (in seconds), the rate 
of sampling (in KHz), initiate the digitiz- 
ing process and manipulate the end 
result in a variety of ways. They've 
even set you up with a folder full of 
sounds, like drum types and basic 
waveform types. 

To find out where you stand at any 
given moment, you get a bar chart that 
displays the amount of available RAM 
broken down in three ways.- space 
taken up by the sample, the space used 
by the copy buffer and the RAM left to 
use. Hitting the Stats button gives you 
a readout of the vital figures: the length 
of the sample (or, as you'll see later, a 
marked section) in seconds and num- 
ber of samples (directly translated to 
RAM used), the sample rate and what 
percentage your high and low peaks 
are. 

At the grass roots you can adjust the 
volume and overall level of the sample. 
You can mark a block and cut, copy, in- 
sert and replace it within the main 
body of the sound, in addition to sav- 
ing and loading blocks of entire sound 
to and from disk. They've even slipped 
in a couple of commands for zooming 
in or out on the marked section of the 
sample to make your edits more pre- 
cise. Overall, this cut-and-paste capabil- 
ity allows you to edit sounds together 
for whatever purpose you have, be it 
commercial applications or just for fun, 
giving you a low-cost recording and 
editing studio. 

You can also alter the sound itself 
with the Reverse, Squeeze, and Stretch 
functions. The Reverse command is 
easy enough to understand: It will take 
the entire sound (or a marked block) 
and re-display it backwards. All those 
folks complaining of "backward mask- 
ing" (those inverted messages inserted 
in musical passages that some claim 
are really evil, subconscious sugges- 
tions) will have an easier time of prov- 
ing their claims with this tool. 

Selecting Squeeze and Stretch short- 
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ens or lengthens a sound and changes 
its pitch equal to one musical note each 
time you enact them. If you double- 
click on either of these buttons, you 
can enter directly the number of times 
you want the effect to be processed. Un- 
fortunately, there's no provision for 
changing the length of the sound 
without altering the pitch, so voice 
samples that are stretched or squeezed 
will tend to sound unnatural with 
regards to pitch, like the effect that 
spinning a turntable faster or slower 
will have on its playback. 

Some hi-tech solutions have been de- 
vised for "compressing" a sound — in 
other words, changing the time of a 
sound without affecting the pitch— and 
some commercial producers, among 
others, are using it to cram more infor- 
mation into a limited period. I'm not 
sure what effect adding this procedure 
would have had on the cost of Nava- 
rone's unit, but it would have made the 
package that much more powerful by 
letting the user change the length of a 
sample without an audible difference. 

There are a few more sound- 
processing tools available to you. The 
first involves a Mix command which 
will take a block and overlay it onto 
another area of the sample. Like "over- 
dubbing" in a recording studio, this 
procedure combines the two signals 
into one. It'll make one voice become 
many voices or make various digitized 
sounds appear simultaneously created. 

The other enhancements are on the 
Rack screen: namely, Echo and Reverb. 
Echo is a repeating of the initial sound 
(like yelling in a valley and hearing the 
sound come back) and reverb is a very 
fast echo (similar to singing in a tiled 
room and hearing the sound reverber- 
ate rapidly in the small area). You can 
add these effects to an existing sound 
in memory or use it to enhance a 
sound in memory or use it to enhance 
a sound as it is digitized. 

The rates of the effects can be con- 
trolled as well. I found that these two 
enchancements, as well as the Mix 
command, severely alter the original 
sound's clarity, bringing about a fuzzi- 
er quality not heard at the start. For 
this reason, you should save the origi- 
nal sound, as you may find the result 
from these effects to be detrimental 



enough to be undesirable for your 
application. 

Aside from digitizing a sound from 
an audio source, you can create your 
own by drawing the waveform and 
envelope on the screen. I'm not sure 
what use this is as it's ten times easier 
to record a sound with a mike or other 
source. If you choose to do things this 
way, you only have to click on the 
Draw Wave/Draw Env button on the 
Command screen and use the onscreen 
cursor to create the desired waveform 
and enveloping. 

Another application that the ST 
Sound Digitizer comes equipped 

That's the 
problem with 
digitizing: 
For a good 
quality 
reproduction, 
you have to 
have a lot of 
memory for 
your sample. 

with— though, as you'll see, it's some- 
what limited and I can't really see 
where you'd put it to use — allows you 
to plug a MIDI keyboard into the ST's 
MIDI ports for playback of sounds. I 
thought it strange that the manual 
would have you hooking a MIDI cable 
from the ST's MIDI IN port to the key- 
board's MIDI OUT port because I 
figured that the digitizer software 
would send the sound to the keyboard. 
Reading further informs you that the 
software "does not provide any kind of 
sequencing or downloading function 
for your keyboard." 
This is where the limitation comes 



in. Your MIDI keyboard will only trig- 
ger the ST, which holds the sample in 
its memory. I was hoping that it would 
be playable through the keyboard's 
electronics, like you have with a MIDI 
"patch" program (a utility that lets you 
move synthesizer sounds from the 
computer to a MIDI instrument and 
vice versa, as well as store them on a 
computer disk). The sound varies in 
pitch with the note you play (middle C 
is the key that plays the sound at its 
normal rate and is the keyboard's 
"pivot point"), so you can "play" on the 
ST, but the output is only monophon- 
ic (playing one note simultaneously), 
regardless of the capability of the key- 
board. I doubt that this option would 
be usable in a performance. And again, 
you have to provide the cable. 

Outside of the actual digitizer and 
software, the manual was found to be 
lacking in many respects. Granted, this 
package doesn't require much in the 
way of instruction; it's reasonably sim- 
ple to use. What irked me is that some 
of the diagrams don't match their on- 
screen counterparts. An example of 
this is the Rack screen and its cor- 
responding manual illustration on 
page 10 of the booklet. Similarly, on 
page 11, the Command screen buttons 
aren't labeled in the manual, and the 
overall layout varies a bit from the ac- 
tual graphic. On top of that, much is left 
to the user's discovery, as the booklet 
is a bit thin on some points. 

On the other hand, they've gone to 
quite a lot of trouble to include a good 
deal of technical data for those who'd 
like to utilize the digitizer in their 
programming efforts or those who'd 
like to know how it ticks. They've 
detailed how it works, the file format, 
even how to read the various voltages 
that are output by the cartridge. 

The ST Sound Digitizer is none-too- 
high-priced and a neat piece of work on 
the whole. Complex works will require 
some other means as the length and 
quality of the sample are very restrict- 
ed by memory usage, and mixing of 
multiple sounds is not the cleanest it 
could be. But if you'd like to build a 
library of sound effects for use in pro- 
grams, or record and edit advertise- 
ments for your local radio station, this 
product fits the bill.j^ 
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Most of the 
would-be 
joystick 
magnates 
have long 
since moved 
to the 
'Where Are 
They Now? 1 
file, but a 
few hardy 
survivors 



by Bill Kunkel, Joyce Worley 
and Arnie Katz 

Build a better mousetrap and the 
world will beat a path to your door. 
Since the debut of the classic Atari 
joystick (single-button, nine-position) 
almost a decade ago, a similar ideal has 
motivated artisans and technicians to 
better that original product. 

The tinkerers tried everything: new 
technology; replacing the leaf-style 
switches with microswitches; new de- 
signs; moving the button; adding but- 
tons; making the base larger; reducing 
the base; bigger sticks; smaller sticks; 
no sticks at all; and a near-infinity of 
similar modifications. During the glory 
days of the programmable video-game 
revolution, dozens of companies 
produced Atari-compatible joysticks of 
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every imaginable stripe. There were 
surfboard controllers; wireless con- 
trollers; no-hands controllers; tracballs 
(the upside-down mouse); and even 
podium-mounted joysticks. 

Most of the would-be joystick mag- 
nates have long since moved to the 
"Where Are They Now?" file, but a few 
hardy survivors remain. Herewith is a 
look at some of the many controllers 
that are compatible with the ST. 

Atari 

It's interesting that the original Atari 
VCS joystick, the industry standard 
and one of the most universally suc- 
cessful products ever designed, has two 
distinctive features: It's square and it 
has a single action button. In all these 
years, the square shape and single but- 
ton have worked just fine. True, some 
games were designed with two buttons 
in mind— Electronic Art's One-on-One, 
for example— but translating that or 
any other game to one-button format 
was never an insurmountable limita- 
tion. The box-like shape fit comfortably 
into the hands of a generation of game 
players, young and old alike. 

When Atari finally got around to "im- 
proving" on this beautiful joystick, 
they gave it a trimline shape, added a 
button and called it the Atari 
Pro-Line. 

The problem with dual buttons is ob- 
vious: They must be placed on the sides 
of the controller to make them acces- 
sible. As a result, the controller had to 
be thinned down so the user could grip 
the stick and get to both buttons. 

This new stick is an insult to the 
pristine perfection of the old VCS 
joystick. After five minutes of play with 
this baby, the gamer's anchor hand is 
stiff, throbbing and fixed in an arthrit- 
ic, claw-like shape. Using this stick is 
no walk in the park. 

To round out the package, the design- 
ers also added an unwieldy nob to the 
top of the joystick shaft to make sure 
that the pain is spread evenly among 
hands and fingers. 

Comfort— D; Control— C + ; 

Durability— B + . 

Kraft System 
The Kraft Atari-compatible 
Joystick is the most perfect joystick 
ever made. It is the rich man's version 
of the classic Atari joystick. The cheap 
plastic casing of the Atari is stream- 
lined into a one-piece (but still square) 
base; the fat, stubby shaft of the Atari 
is replaced here by a thin, gracefully 



beveled control stick; and the some- 
what stiff play on the Atari is processed 
into the slickest control device in all 
the known worlds. 

The Kraft Joystick is ideal for all 
kinds of games and users. It's amazing- 
ly durable too. This reviewer's own 
Kraft Joystick is over six years old, 
has been kicked, thrown and stepped 
on more than once, yet never missed 
a command in all that time. 

Left-handers can opt for the "Switch 
Hitter" model, with duplicate action 
buttons in the upper left and right 
corners. For real playability, the new- 
er versions contain a "mazemaster" 
feature. This disables the diagonal 
direction commands and limits move- 
ment to up-downfleft-right for maze- 
chase contests. 

Beautifully designed and crafted, this 
is the state-of-the-art controller, and 
has been for over half a decade. 
Comfort— A; Control— A; 

Durability— A + . 

Epyx 

The Epyx 500XJ Joystick is a 

well made but badly designed joystick 
for right-handed players only (or lefties 
capable of using their left hand as an- 
chor). The 500XJ is built like a rock, 
with a thick, deep base and a 
microswitch-driven, solid-steel, nobbed 
shaft. 

The action button is located on the 
right side, just above a cutaway. It is the 
position of this cutaway that makes 
this stick awkward for southpaws. It 
seems all but indestructible, and be- 
lieve me, this puppy has been slammed 
up against the wall more than enough 
times to adequately test that 
supposition. 

The problem is quite simple: This is 
the most painful controller ever built. 
The 500XJ even hurts players with 
large hands or pianist's fingers. After 
a round or two of, say Robotron, you're 
ready for a trip to the Mayo Clinic. 
Comfort— F; Control— B + ; 

Durability— A+. 

Mastertronic 

The Magnum Joystick from the 
low-cost software maven, Mastertronic, 
is equivalent to most of the company's 
other products: It's a good, functional 
joystick at a reasonable price. 

This controller uses a pistol-type 
grip, but mounts the button on the out- 
side, rather than trigger-style. The 
short, nobbed shaft positioned on top 
of this housing makes the stick ideal 



for left- or right-hand use. 

The Magnum is comfortable, and 
gives the user excellent control in all 
types of games. It is not all that dura- 
ble, however. The red plastic control 
shaft pops out under significant torque. 
The shaft can be reinserted, but once 
it has popped free, the stick never func- 
tions exactly the same again. 
Comfort— B + ; Control— A; 

Durability— D - . 

Suncom 

Fans of "tight" joysticks — those 
with a minimum of play— invariably 
praise the Suncom joysticks. The 
StarFighter is a small joystick with 
a short, stump-like shaft, while the 
Slik Stik offers a nobbed control stick. 
Both have a very short "throw" (the 
physical distance the shaft must be 
moved to inaugurate a command). 

The top-of-the-line Suncom stick is 
the Tac2. It features a metal (rather 
than plastic), nobbed shaft, Suncom's 
typically compact base, and dual-action 
buttons for southpaws (other Suncom 
sticks are right-handed). 
Comfort— B; Control— B + ; 

Durability— A. 

Camerica 

The Camerica joysticks are the ones 
you find in the bargain bin selling for 
as little as $7. They echo the worst of 
the joystickmania of the early '80s, 
with remnants of the poorest designs 
of the era, borrowed in style from the 
Wicos, PointMasters and GripSticks. 

They have "bad" names like Termi- 
nator, Turbo Charge and 
MicroMaster, and all feature large, 
unwieldy bases and suction-cup "feet." 
These suction feet seemed like a good 
idea when first produced seven years 
ago, but the designers forgot one thing: 
Very few players have access to 
suction-compatible surfaces when play- 
ing video and computer games. Video 
games are often played on rugs, and 
computer games at workstations where 
the microprocessor generally occupies 
the space the joystick must be stuck to. 

These joysticks also possess gigantic 
shafts, with finger-molded grips and 
optional fire buttons everywhere but 
the underside of the base itself. The 
MicroMaster and Turbo Charge 
have buttons atop the shaft, on the 
shaft itself and on the upper left and 
right-hand corners of the base, and 
none of them are comfortable. 
As a wise man once said, "You get what 
you pay for." 
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Comfort— D- ; 
Durability — C. 



Control— C; 



ENTERTAINMENT 

THE GUILD OF THIEVES 
by Magnetic Scrolls 

Rainbird 
P.O. Box 49 
Ramsey, NJ 07446 
(201) 444-5700 
Low resolution $44.95 

by Bill Kunkel 

The Guild of Thieves is the eager- 
ly awaited followup to Magnetic Scroll's 
original ST adventure, the Pawn. The 
Pawn broke new ground in text and 
illustrated-text adventures with its 
state-of-the-art parser and beautifully 
rendered pull-down illustrations. 

Guild of Thieves, though not a se- 
quel, reprises the parser (so sophisticat- 
ed it can comprehend one word used 
many times in a single sentence, as in: 
"Plant the plant in the planter."); the 
setting (Kerovnia) and those breathtak- 
ing color "plates." 

Unfortunately, the game's pilot is 
even flimsier than its predecessor's. 
The player, it seems, is up for member- 
ship in the notorious Kerovnian Guild 
of Thieves. The Guild doesn't accept 
just any old Tom, Dick or Thrush- 
whacker into its larcenous bosom, so 
the player must prove himself in mat- 
ters of skill, stealth and treachery. 

As the game opens, the player is sit- 
ting in a rowboat on a quiet, mist- 
speckled lake alongside a taskmaster 
from the Guild. The taskmaster sup- 
plies the player with a series of 
challenges— looting a mansion, despoil- 
ing and robbing a grave, etc.— which 
must be met to be accepted into the 
Guild. 

Guild of Thieves uses the kind of 
nonstory line common to role-playing 
adventures. But unlike such games, the 
user does not see his surrogate develop 
and enhance characteristics and skills 
(strength, experience, spells, etc.) In 
other words, for an adventure, it's un- 
usually thin. The player goes some- 
where, steals something and returns 
with it. The taskmaster then tells him 
to steal something else, and so on un- 
til the requisite number of items have 
been pilfered. 

On the plus side, the puzzles are 
often delightful and the illustrations 
are absolutely eye-popping. The man- 



sion is particularly impressive, with its 
old-fashioned drawbridge, moat and 
billiard room. Each detail is rendered 
with incredible delicacy, from the soft 
brush-velvet of the overhead lamps to 
the burnished leather of the elegant 
couch. 

One can only hope that in future 
fames Magnetic Scrolls will lavish half 
as much care on the story line as it 
does on the artwork. 



LEISURE SUIT LARRY IN THE 
LAND OF THE LOUNGE LIZARDS 
by Al Lowe and Mark Crowe 

Sierra On-Line, Inc. 
P.O. Box 485 
Coarsegold, CA 93614 
(209) 683-6858 
Low resolution $39.95 



by Arnie Katz 



pands upon the same theme. It's still 
not a terrific gift for the leader of the 
local chapter of NOW or a member of 
the Moral Majority, but it guarantees 
hours of lighthearted adventuring for 
more open-minded adults. 

Designers Al Lowe and Mark Crowe 
present Leisure Suit Larry in the 
game system made famous by Sierra's 
King's Quest series of fantasy quests. 
The user moves 40-year-old Larry 
through more than 50 colorful, well- 
animated screens showing the pleasure 
and pitfalls of the sin city of "Lost 
Wages." Dozens of clever visual 
embellishments— like a barfly who 
swings her leg enticingly— constantly 
pop up to surprise and delight the 
player. 

A 900-word parser helps the player 
communicate with the people (mostly 
women) encountered by the virginal 
salesman during his quest to win and 
woo an obliging lady. 




Once upon a time, there was a harm- 
lessly juvenile adventure game called 
Softporn Adventure (Sierra). This 
all-text title cast the player as a Don 
Juan on the town for a night of drink- 
ing, gambling and woman-chasing. Its 
somewhat unsophisticated view of sex, 
culled from the philosophy of Hugh 
Hefner, circa 1962, may have raised a 
few prudish hackles, but it was hard 
not to surrender to its lighthearted 
hedonism, liberally laced with broad, 
self-deprecating humor. 

Leisure Suit Larry updates and ex- 



Gambling also plays a big role in 
Leisure Suit Larry. A trip to the casi- 
no gives the user a chance to risk Lar- 
ry's stake with a pull of the slot- 
machine lever or a hand of Blackjack. 
The ability to use the proceeds from 
such risk-taking to further Larry's pur- 
suit of carnal knowledge makes the 
user a little more than careful about 
winning and losing imaginary money. 

Leisure Suit Larry is one of a spate 
of recent adult adventure programs 
released for home computers. It's by 
far the best. // 
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Someday, 
you'll be 
writing 
programs in 
several 
languages. 
You might as 
well plan for 
that 

eventuality 
now. 

Metacomco Overview 

The Programmer's Source: 

a survey of development tools from Metacomco 



Menu v 1.2 $29.95 

Metacomoco Make v2. 1 6 $69.95 

Lattic C v3.04.0 1 $ 1 49.95 

MCC Pascal 68000 vl. 35.04 $99.95 

MetacomcoBCPLvl.il $149.95 

Cambridge Lisp vl.10 $199.95 

Metacomco pic 
26 Portland Square 
Bristol BS2 8RZ, UK 
(0272) 428781 



by Tom Castle 

So, you're interested in program- 
ming on the Atari ST. If you're not 
fluent already in a given programming 
language, you'll probably be asking 
which language is the best to learn. The 
answer is an emphatic "Any of them!" 
Each language has strong and weak 
points. Some are particularly useful for 
a specific application. Others are more 
generally useful with the concomitant 
sacrifices that go along with all-puqx>se 
products. 

The general-wisdom advice floating 
around is to start with a language for 
which you can find help. BASIC has al- 
ways been a popular choice, but C is 
quite in vogue. Pascal and its child, 
Modula-2, were expressly written as 
languages with which to learn 
programming. There are several, read- 
ily available sources of information and 
help, such as magazines, books, user 
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groups and bulletin boards for all those 
languages. 

Once you decide on a language or if 
you already feel comfortable with a par- 
ticular language, you then have to de- 
cide on which package you'll drop your 
hard-earned money. Again, for a little 
sage advice, look at the features, at how 
much support you'll get from the 
producer and the development com- 
munity, and at price. You might also 
look at the future. 

If you take up program development 
with a fervor, someday, you'll be writ- 
ing programs in several languages. You 
might as well plan for that eventuality 
now. Metacomco, a major producer of 
the development tools for Motorola 
68000-based machines, has anticipated 
your need. The development tools cur- 
rently available from Metacomco for 
the Atari ST are Menu + , a GEM shell; 
Make, a UNIX-like utility for riding 
herd on projects; and the language 
products Lattice C, MCC Pascal 
68000, Cambridge Lisp, BCPL, 
and the MCC Macro Assembler. 

Not only do these products integrate 
well with each other, but several can 
be used to cross-develop on other com- 
puters. Metacomco's Lattice C is direct- 
ly transportable to the IBM and Amiga 
versions of Lattice C. Metacomco spe- 
cifically includes functions to provide 
UNIX, XENIX, and ANSI compatibility. 
Cross-development for the Amiga com- 
puter is particularly easy since 
Metacomco also produces MCC Pascal, 
BCPL, and Cambridge Lisp for the 
Amiga. 

The Subject 

For those of you new to compiled lan- 
guages, a quick review of some of the 
terms should be in order. Each 
microprocessor, the Motorola MC68000 
in this case, has a unique set of special 
memory spaces called registers. To 
manipulate data within those registers 
and within the main memory of the 
computer, operations must be 
programmed using a distinct instruc- 
tion set. That instruction set is a set of 
numbers that the microprocessor will 
recognize as commands for it to per- 
form given tasks. Programs written in 
this purely numerical code are called 
machine language. The command in- 
structions are called opcodes. The data 
to be operated on are called operands. 

An easier way of specifying opcodes 
and operands is called assembly lan- 
guage. For readability, the numerical 



opcodes are replaced by a set of 
mnemonics that each represent a 
given operation. Assembly language 
has a means of labelling constants, 
variables and points of a program. In 
addition, the other conventions are in- 
cluded to aid writing assembly lan- 
guage programs. Assembly language is 
considered low-level because it per- 
forms very closely to the actual work- 
ings of the computer. The conversions 
of an assembly language file into 
machine language is done by an assem- 
blyer. The resulting machine language 
file is called an object or binary file. 

The conversion of a high-level lan- 
guage into an object file is done by a 
compiler. Languages are termed high- 
level if they have the computer per- 
forming complex tasks in such a man- 
ner that the programmer doesn't have 
to worry about the details of how the 
task is accomplished. The text files that 
you write for a program, whether for 
an assembler or a compiler, are called 
source files. Usually a compiler will 
produce an assembly language or a 
pseudocode file before the final object 
file is produced. Each time a compiler 
must go over the text file to produce 
the object file is called a pass. So a 
single-pass compiler is easier, though 
presumably less versatile, than a multi- 
pass compiler. 

Once a final object module is creat- 
ed, it must be treated by a linker pro- 
gram to make an executable program 
file. The linker usually connects some 
initialization code and any library rou- 
tines that weren't resolved in all the ob- 
ject modules you specify. 

Common Ground 

If you do buy several development 
tools in the future, you may find your- 
self in the middle of a hodge-podge un- 
less care is taken. Usually you can find 
an assembler that will produce mod- 
ules that can be linked with those from 
high-level language compilers, but you 
may run into trouble linking modules 
from different high-level languages. 

One of the nicest features of the 
Metacomco products is that any mod- 
ule produced by one product can be 
linked with modules from any other 
product. You have the possibility of 
writing modules in the language that 
is most suited to a particular section of 
your program and still come up with 
a unified package. If that isn't enough, 
all Metacomco products have the op- 
tion to produce CP/M-68K object files 



for linking compatibility with Digital 
Research's LINK68 from the Atari De- 
veloper's System. Metacomco doesn't 
provide that linker with any of its 
products however. A nice feature of 
Metacomco's language packages is that 
they all include the assembler source 
files for the GEM functions. 

Menu + 

Each of the language products from 
Metacomco comes with a GEM shell 
called Menu + . You're able to customize 
drop-down menus that will perform 
the instructions you place in a batch 
file for each menu selection. This is one 
of the most useful products I have seen 
in a long time. If you have done much 
programming, you know that it's no 
fun hunting for your BATCII.TTP file 
among the myriad of files you build up 
in your compiler or linker folders. 

Your customized menus and the as- 
sociated batch files are coordinated 
through a file called MENU. INF. Proto- 
types of this control file come precon- 
figured for use with Metacomco's Lat- 
tice C, MCC Pascal, and MCC Macro As- 
sembler. You can still alter these as you 
want. 

Menu+ not only organizes your 
work space but also provides some han- 
dy utilities. A command line interface 
is provided for commands that aren't 
included with the drop-down menu. A 
history is generated every time you ac- 
cess Menu + . This isn't only provided 
for recollection's sake but also as a con- 
venient method of repeating any com- 
mand line by double clicking the par- 
ticular line in the history. A UTIL.TTP 
program is included to perform func- 
tions like renaming, deleting, copying, 
showing, and printing files. This 
relieves the need to return to the GEM 
Desktop for those operations. 

Menu + doesn't have to be used solely 
with Metacornco's development 
products. It can be used with any de- 
velopment package; in fact, with any 
set of application programs. Although 
it's bundled with all of Metacomco's de- 
velopment packages, it's also sold 
separately. If you have a need to har- 
ness your desktop a little better, 
Menu + is well worth the investment. 
It is very versatile and fairly 
inexpensive. 

Metacomco Make 

The other non-language develoment 
tool provided by Metacomco is their 
Make program. It's sold separately and 
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bundled with the Lattice C package. For 
those of you who are familiar with the 
UNIX Make, you'll feel right at home. 
It comes with a nice GEM-based screen 
editor, a prototype control file (called 
a makefile), a clock adjustment utility, 
and a Touch utility to update a file's 
date stamp without altering the 
contents. 

Briefly, Make allows you to set up a 
programming project such that file de- 
pendencies are outlined and automat- 
ically managed by Make. For example, 
you might have a main program mod- 
ule that requires a separately linked 
module to be included. If the separate- 
ly linked module is changed in any 
way, Make will detect the change, and 
recompile and assemble both the new 
module and the main program portion 
automatically. 

Makefiles are generated by the user 
for each programming project. A vari- 
ety of instructions are available for 
maximum flexibility in setting up a 
makefile. Explicit rules define file de- 
pendencies by the actual names of the 
files along with the exact command se- 
quence you want followed. Implicit 
rules only consider file types when de- 
termining which files should be treat- 
ed. Macros and control directives are 
also supported. 

For those of you who are familiar 
with UNIX Make, there are some differ- 
ences to be mentioned. Make uses 
makefiles rather than the built-in im- 
plicit rules of UNIX Make. The direc- 
tives .DEFAULT and .PREVIOUS as well 
as the macros '$?' and '$%' are not sup- 
ported by Make. The '::' form of explicit 
rules is not supported also. Tab charac- 
ters are not essential as in UNIX Make, 
and colons must be separated by a 
space since colons have a special mean- 
ing in file path notation of GEMDOS. 

Screen Editor 

The screen editor included with the 
Make package is also included with all 
the language products. It uses drop- 
down menus as well as keystroke com- 
mands. ED, as Metacomco calls their 
multiple-window screen editor, uses a 
fixed-size text buffer which defaults to 
about 64K but can be changed easily. 
Scrolling can be performed horizontal- 
ly or vertically with a message and 
command-line area at the bottom of the 
screen. 

There's quite a variety of commands 
available with ED. Twenty-one immedi- 
ate commands are peformed by either 



a single keypress or a control-key com- 
bination keypress. Most of those com- 
mands are used for cursor control, in- 
serting and deleting text, and such. 
There are also 38 extended commands 
that must be typed at the command 
line. Those commands are used most- 
ly for things like block operations, for- 
matting, and search and replace 
functions. 

The editor is quite useable, although 
the mouse is not supported in the text 
field. There is no provision for display- 
ing line numbers. 

Lattice C 

Atari ST programming is heavily sid- 
ed toward the use of C. This is most 
probably due to the fact that a lot of 
GEM was written in C. The DRI 
documentation and software in the 
Atari Developer's Package supported 
only the use of C. Although Lattice C 
was not one of the first C packages to 
be available for the Atari ST, the com- 
piler already has a prominent reputa- 
tion. It's considered by many to be the 
foremost C compiler for the IBM PC 
line. 

Lattice C comes with several ameni- 
ties not included with Metacomco's 
other language products. As mentioned 
before, Lattice C comes bundled with 
Menu+ and is the only language 
product that comes with Metacomco's 
Make and Debug + programs. 

It's also the only package that comes 
with a resource construction kit, NRSC, 
which enables the rapid development 
of resource files containing menus, di- 
alog boxes and the like. Header files 
can be created with the program for C, 
Pascal, Modula-2, Fortran 77 formats. 
Metacomco also claims that no special 
programming is needed to conform the 
resource file to either medium- or high- 
resolution monitors. It should automat- 
ically adjust to the monitor in use. I 
don't have a monochrome monitor, so 
I wasn't able to test this claim. NRSC 
is upwardly compatible for resource 
files created by the Atari and Mega- 
max C packages. It does have a few ex- 
tras, however, that could jeopardize 
compatibility in the other direction. It 
supports the use of two additional flags 
that can be set by the user for extensi- 
ble types of objects. 

A symbolic debugger, disassembler, 
and link loader called Debug + is 
provided with the Lattice C package. 
You can display memory as hexadeci- 
mal and ASCII dumps or as a dissas- 



sembly listing. The debugger uses the 
symbols generated at the end of a pro- 
gram by the -DEBUG linker option. The 
link loader will install the object mod- 
ule and any library modules into 
memory, resolve intermodule refer- 
ences in preparation for debugging. 
Debug + has a rich set of commands 
that let you display the entire symbol 
table, dissassemblies, dumps, and 
memory locations of any symbol. User- 
selectable breakpoints can be inserted 
in your code, or you can use the STATE 
command to examine register contents 
and the current assembly instruction. 
Any variable can be examined at any 
point in the debugging process. 
Debug + also lets you use predefined or 
user-defined macros to speed up the 
debugging process. A WHERE com- 
mand will tell you what C function is 
currently being examined. Commands 
are also provided to trace forward and 
backward through a program. Thirty- 
one commands are provided 
altogether. 

The Lattice C compiler is complete. 
The full Kernighan and Ritchie specifi- 
cation is included with extensions to 
conform to the ANSI standard. As men- 
tioned earlier, functions providing 
both UNIX and XENIX compatibility 
are included. In fact, there are so many 
functions included in the runtime 
library, a little over 320 in all, you 
could easily be seduced into using al- 
luring functions that will destroy any 
chance of compatibility with other C 
compilers for the Atari ST. This isn't 
good for your ST-Log submissions. In 
fact, compatibility with other C compil- 
ers for the ST must be meticulously 
handled since Lattice C is the only C 
compiler that uses 32-bit integers. Care- 
ful, careful! 

Even with the caveats, it's a nice com- 
piler. Line A calls— the code that OEM's 
VDI uses to draw graphics primitives, 
to manipulate the mouse form, to per- 
form bit and text block transfers, and 
to manipulate sprites and rasters— are 
included. Double-precision floating 
point as well as MC 68881 Math 
Coprocessor support is available. 

There are three levels of memory al- 
location which can be called. Level 
three functions call level two functions, 
and so on. There are also three levels 
of file access. GEMDOS, BIOS, and 
XBIOS system traps are supported. 
Qsorts for all the variable types are in- 
cluded. A full set of string manipula- 
tion functions are also included. 
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You can easily be overwhelmed by 
Lattice C if you're not already familiar 
with C. However, you'll never outgrow 
this product. The 600-page manual 
covers the compiler, linker, and all ac- 
cessory programs in great detail. Each 
function is thoroughly described, 
many with example code fragments for 
the more complex functions. 

MCC Pascal 

Pascal was originally written by Nik- 
laus Wirth in the late '60's based on the 
popular language ALGOL. Wirth formu- 
lated the language as a teaching tool for 
the instruction of proper, structured 
programming techniques. Large pro- 
grams are segmented into structured 
blocks which can be nested, but not 
overlapped. The block structure en- 
courages "top-down" program develop- 
ment. A skeleton can be written while 
the various levels of detail can be tack- 
led as you come to them. Pascal has 
since become one of the most widely 
used languages. It's one of the most 
readable and readily accomplished lan- 
guages. This is testified by the abun- 
dance of Pascal packages for the Atari 
ST. 

MCC Pascal 68000 offers a single-pass 
compiler that produces native 68000 
code rather than a p-code. As men- 
tioned earlier, this allows Pascal object 
files to be linked with object modules 
from any of Metacomco's other lan- 
guages. A rather complete error report- 
ing system is included. 

The implementation also conforms 
to the ISO 7185 (level 0) standard. This 
is important for portability considera- 
tions. Very large arrays and sets are 
limited only by available memory. MCC 
Pascal has just about as many classifi- 
cations of variables, imaginable, includ- 
ing 1- and 2-byte integer subranges, 
variant records, booleans, 4-byte 
pointers, and file types among others. 

Although all the GEM VDI and AES 
bindings are accessible, no resource 
construction set is included in the 
package. Like the Lattice C compiler, 
integers are expressed as 32-bit values. 
MCC Pascal also uses 32-bit, 7-digit pre- 
cision real numbers. Indentifiers can 
be of any length, and all characters are 
considered. 

There are a few extensions to the ISO 
standard included with MCC Pascal. 
The RESET and REWRITE procedures 
are included so that internal files, those 
that exist only during the execution of 
the program, can access named files. 



The INCLUDE and EXTERNAL direc- 
tives allow modular inclusion of pro- 
gram fragments during the compila- 
tion process. Shades of Modula-2! MCC 
Pascal wasn't extended to include bit- 
wise operators however. 

The MCC Pascal manual disclaims 
the idea of being a language tutorial. It 
is, however, a nice explanation of the 
language elements and syntax. Three 
example programs are given which 
show how to access GEM features, to 
call assembler language routines from 
Pascal, and other nifty things. 

MCC Macro Assembler 

Now that you feel comfortable with 
the popular high-level languages, it's 
time to delve into the bowels of 
programming, the assembler. The MCC 
Macro Assembler package, like the Pas- 
cal product, disclaims the idea that it 
is a tutorial. This is an understatement. 
The manual does not even list the 
68000 instruction set. It does, however, 
contain a fairly thorough treatment of 
addressing modes, coding conventions, 
and syntax. The assembly control 
directives, along with the facility for 
conditional assembly, are thoroughly 
explained. There is also a bouncing-ball 
example program and the source code 
for the GEM routines. 

Several options of the assembler con- 
trol Hie output. The MCC Macro Assem- 
bler can produce GST or TOS format 
object files or simply a listing file. Sym- 
bol dumps and cross-reference tables 
can be generated also. You have the op- 
tion to make the assembler insensitive 
to label upper/lower case distinctions. 

The source code of a simple debugger 
is included. This seems to be more for 
the purpose of illustrating some TOS 
features than for the purpose of provid- 
ing a highly useful debugger. 

There are some ups and downs to the 
MCC Macro Assembler. Local labels are 
supported. That's good. No macro 
libraries, other than the GEM VDI and 
AES stuff, are provided. That's bad. One 
nice thing is the facility to include files 
by the assembler directives IIDR (head- 
er), EQU (equate), and INC (directories 
from which INCLUDE files should be 
searched). 

BCPL 

Well, maybe you're not quite ready 
for assembly-language programming 
but want the enormous power that 
"low-level" access can bring to you. The 
C language provides access to the inner 



workings of the computer, but it's not 
the only alternative to assembly lan- 
guage programming. There's a 
predecessor to C that's even less re- 
strictive to the programmer than C. It's 
called BCPL. I had never heard of it. My 
friends had never heard of it. It seems 
to be widely used though. Metacomco 
wrote AmigaDOS in BCPL. It must be 
like Slim Whitman— it's so darn popu- 
lar in Europe. 

If Pascal is the fascist of variable typ- 
ing, BCPL is the anarchist. BCPL uses 
data words of 32 bits. It doesn't care 
how you want to use them. They can 
be pointers, integers, packed charac- 
ters, booleans, or whatever bit pattern 
you want. 

There is some structure to variable 
usage, however. From the vein of BCPL 
flowed the C tradition of strings as 
pointers to the byte-by-byte pack. Un- 
like C, the memory occupied by the 
character array starts with the length 
of the array followed by the characters. 
BCPL also incorporates vectors which 
are arrays of data other than character 
strings. Tables, which are initialized 
vectors, are also used. 

Like C, BCPL passes parameters by 
value and controls them by scope. To 
be specific, variables can be Manifest, 
being a globally defined constant; Lo- 
cal, existing only in its prescribed 
block or procedure and being deallocat- 
ed upon exit from the block or proce- 
dure; Static, retaining its value 
throughout the execution of a program 
but having a local scope; or Global, be- 
ing available at all times. 

Metacomco's BCPL manual is proba- 
bly the most instructive of its language 
products as to the explanation of the 
language elements. The BCPL environ- 
ment and memory-usage map are 
given in an appendix. Six example pro- 
grams are given, exemplifying in- 
put/output, switch-case constructs, data 
manipulation, flow control, and GEM 
functions. A detailed description of 
each library function is provided in the 
manual. 

Metacomco includes a few extensions 
to the language. Floating point opera- 
tions are not usually a feature of BCPL, 
but Metacomco provides single preci- 
sion real numbers and a few functions 
that allow real integer conversions. A 
WORD indirect operator is provided to 
manipulate arrays of 16-bit values like 
the control arrays returned from in- 
itializing a GEM workstation. The EX- 
TERNAL Keyword is included with 
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BCPL, like Metacomco's other language 
products, to allow interfacing to C and 
Assembler routines. They have also ad- 
ded procedures for those of you who 
would understand the importance of 
that. 

Cambridge Lisp 

The last language product for us to 
examine is Metacomco's Cambridge 
Lisp. With all the hoopla over artificial 
intelligence over the last few years, you 
might think that Lisp is a fairly new 
language. The truth is that Lisp was in- 
vented by John McCarthy in the late 
'50's. We're talking vacuum tubes here. 
Lisp stands for LISt Processing. It re- 
lies heavily on recursion and the bas- 
ic data structure, a pair. From those 
two ideas, lists and trees can be creat- 
ed and manipulated. 

Lisp is used in a variety of applica- 
tions that are not well-suited to 
procedural languages. Natural language 
query interfaces, symbolic algebra, ro- 
botics, and expert database systems are 
all fertile fields for Lisp. In fact, any ap- 
plication that's heavily decision-based 
is ripe for Lisp. 

There has been sufficient time since 
the inception of the original Lisp for 
several dialects to emerge. Metacomco 
describes Cambridge Lisp as a member 
of the standard Lisp family with close 
similarities to PSL, Portable Standard 
Lisp. A nice feature of the manual is to 
point out differences between Cam- 
bridge Lisp and other Lisp systems, 
particularly MacLisp, Interlisp, and 
Common Lisp. An appendix lists the 
extensions available in Cambridge Lisp 
that are not found in standard Lisp. 

There are two considerations that set 
Lisp apart from Metacomco's other lan- 
guage products. First, it's basically an 
interactive language. Most of your in- 
teraction with Lisp is through the Su- 
pervisor, a read-evaluate-print loop in- 
terpreter. Anyone who has 
programmed in BASIC will attest to the 
ease of program develoment under an 
interpreter rather than a compiler- 
based system. Cambridge Lisp offers 
both. 

Second, it's a declarative language. 
Rather than setting down a procedure 
for the computer to follow, you give the 
computer the means to process basic 
data structures and evaluate expres- 
sions while letting the computer figure 
out how it will go about the task. 

Cambridge Lisp is a large language. 
There are about 400 standard functions 



along with the facility to define your 
own functions. That does not include 
the GEM routines. You can easily see 
that Lisp was originally developed for 
mainframe computers. Metacomco sug- 
gests a full megabyte of RAM in your 
ST to take full advantage of Cambridge 
Lisp, but the system is still quite use- 
able on a 520ST. 

There are several facilities that en- 
hance Lisp implementation. Cam- 
bridge Lisp provides full garbage collec- 
tion and error reporting. A built-in 
prettyprinter is provided. Cambridge 
Lisp also provides the facilities to ac- 
cess double precision IEEE format- 
floating point numbers, rational num- 
bers of the form (27/513), and trigono- 
metric functions, and to use several in- 
put/output streams, and to customize 
syntax. 

Cambridge Lisp also has some ameni- 
ties to make programming chores eas- 
ier. The old program feature of Lisp 
that allows a section of code to be en- 
closed with loops and local variables is 
retained. The catch and throw func- 
tions are also available to make non- 
local jumps. A system for creating in- 
cludable modules is also present. 

Error handling and debugging is 
made easier with some of Cambridge 
Lisp's functions. A few functions let 
you retain a moderate amount of con- 
trol over the program even when seri- 
ous mishaps occur. You can customize 
the amount of error reporting and how 
much backtrace information you want 
for given situations. Cambridge Lisp 
also provides several functions to per- 
form trace, history, and logic mapping 
operations. Tracing can be performed 
in either interpreter or compiler mode. 

I won't attempt to give a synopsis of 
the language itself. That would be a 
monumental task. Lisp is different 
from all the FORTRAN descendents 
with which you may be familiar. It's 
probably sufficient to say that learning 
Lisp will not be easy, especially if you 
are already in the procedural mindset 
of C, BASIC, Pascal, or assembler lan- 
guage. It would also be safe to say that 
once you are comfortable with Lisp, 
you'll be able to write efficient pro- 
grams that can't be written easily in 
another language. 

Conclusions 

Metacomco has a fairly diversified 
line of programming-development 
tools. The Menu + program is especial- 
ly useful even if not used or purchased 



with one of the language packages. 
Make, as any UNIX programmer will 
tell you, is nice for those large projects. 
However, if you're a middling dabbler 
like me, it may not be worth the ex- 
pense and time to use. 

The products that Metacomco should 
release as stand-alone packages are the 
resource file editor (NRSC) and the 
debugger (Debug +), which are includ- 
ed with Lattice C. The unavailability of 
NRSC and Debug + to the Pascal, BCPL, 
Lisp, or assembler language program- 
mer makes those packages look less 
attractive. 

Metacomco's strong suit is Lattice C. 
They've included everything you 
would need for a professional develop- 
ment system. This isn't surprising 
since Atari/DRI promulgated C as the 
language of choice for GEM and the 
Atari Developer's Kit. 

Lattice C should do well since it offers 
IBM and Amiga compatibility. The Al- 
cyon C compiler from the Atari De- 
veloper's Kit will provide IBM compati- 
bility under GEM, but provides no sup- 
port for XENIX or UNIX. 

The Lattice C manual is somewhat 
bug-ridden. The first 30 pages of mine 
were scrambled. The manual also, on 
occasion, uses British spellings for 

GEM functions like fori n centre, but 

the linker will spit these back out to 
you. Overall, though, it's a good pack- 
age, and a strong contender in the C 
market. 

The strong points of Metacomco's 
other languages are the common 
linker and the ability to compile code 
to either CP/M-68K or GST format ob- 
ject files. However, few people will cur- 
rently need several languages that 
produce compatible object modules. In- 
itially, an assembler that's compatible 
with your higher level language may be 
all that you need. It's comforting to 
know that it's available, though. In fact, 
who's to say that you won't need that 
sort of latitude some day? It gives you 
some peace of mind that it's possible 
to expand your language repertoire 
with the confidence of compatibility. 

Tom Castle is an M.S. Chemist in 
Kalamazoo, Michigan. He bought his 
first personal computer, an Apple II, 
in 1980, but had no hesitation 
switching over to his Atari 1040ST. 
He spends most of his programming 
efforts using C on the Atari and Tur- 
bo Prolog on IBM machines. // 
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Plundered 
Hearts 



Infocom 

125 Cambridge Park Drive 
Cambridge, MA 02140 
(617) 576-3190 
$39.95 

520ST— Low Resolution 



by Betty D. DeMunn 

At last! An Infocom "Interactive Fic- 
tion" text adventure of a woman by a 
woman! News of this incredible break- 
through came as a delightful surprise. 
For years I've been masquerading as a 
macho male 18 year old in countless 
adventures, so the chance to shed 
"him" and become "her" was long 
overdue and more than welcome. Rip- 
ping open the package in a frenzy of an- 
ticipation, I thought, "Bless you, little 
Amy Briggs. You have taken one small 
step for woman, one giant step for 
womankind." 

As usual, I found goodies in the pack- 
age: a velvet reticle (purse), a letter from 
Jean Lafond, and a banknote, plus a 
slim manual containing basic info. 
Games are saved within the story disk, 
so I was all ready. With trembling 
hands and pounding heart, I booted 
Plundered Hearts. 

Set in the 17th century, the story is 
obviously a spoof of the romance nov- 



90 



June 1988 ST-Log 



els that leer from drugstore racks. You 
are a young gentlewoman on a ship in 
the Caribbean, sailing to your dying 
father's bedside as per instructions in 
the letter. En route you are boarded by 
pirates (Oops, Freudian chemise)— the 
ship is boarded by pirates, and you are 
snatched by a gorgeous hunk named 
Nicholas Jamison. Your pulse races 
and your bosom heaves. He sets you 
straight about Governor Lafond, a scur- 
rilous liar and champion villain who 
actually holds dear Papa prisoner on 
the island of Ste. Sinistra. Your mission 
is to rescue Papa, decimate the evil La- 
fond, and escape with Nick. On the way 
to this happy ending, you encounter a 
lot of heavy-breathers, a crocodile, and 
several fates worse than death. Sounds 
like fun, huh? 

Did you ever slip on a banana peel? 
You know, airborne one moment and 
flat on your keester the next? That's 
the feeling I experienced as this adven- 
ture unfolded. It was like playing hide- 
and-seek alone. I could find me every 
time. In fact, Plundered Hearts went by 
so fast, I didn't even catch the heroine's 
first name. 

Hype on the package proclaims that 
Miss Briggs read hundreds of romance 
novels, researched 17th-century 
costumes and ships, and was wooed by 
a dashing pirate. No doubt this is true. 
But Amy contracted cliche-itis along 
the way, and I seemed to have all the 
antidotes. I finished ("solved" is too 
strong a word) Plundered Hearts in 
four hours, 523 moves. It should have 
been faster, but I kept trying to make 
a ballgown out of drapes, and putting 
hoops in my skirt so I could parachute 
out of the crow's nest! When one 
spends $40 for an adventure game, one 
expects to develop a meaningful rela- 
tionship with it. This was a case of 
Wham-Bam, etc. 

A new title by Infocom always meant 
buying a notebook to fill with maps, 
clues and assorted ravings. I've com- 
pleted only four out of 20-odd adven- 
tures without the aid of Invisiclues. 
I'm self-rated as "Almost-Inter- 
mediate," and of average intelligence. 
If Infocom still printed difficulty rat- 
ings on the package, Plundered Hearts 
would have to be assigned: "Beginner 
— Novice — E.T." 

Let it be noted, I love Infocom so 
much that my four-letter ATM code is 
"G-R-U-E." But I fear it has loaded its 
marketing bow with a horseshoe. 
Women who read romance novels 



would be better off buying ten of them 
for the price of Plundered Hearts. Not 
only that, but women who own, or have 
access to, or any interest in computers 
are likely to prefer other types of 
fiction. 

Let's not be too cruel. Plundered 
Hearts is well-written. The brilliant 
purple prose is amusing and often fun- 
ny. Amy Briggs is a talent, but, in my 

You are a 
young 

gentlewoman 
on a ship 
in the 
Caribbean, 
sailing to 
your dying 
father's 
bedside 
as per 
instructions 
in the letter. 
En route you 
are boarded 
by pirates. 

opinion, wasted on this sexist plot. Sex- 
ist because one of the levels you attain 
on your way to Happy Ending is "Lady 
Leman." Sexist because it's difficult to 
relate to a woman who doesn't know 
one end of a rapier from another and 
isn't allowed to handle a pistol or to 
sharpen her dagger. Granted, she res- 



cues her virile lover from certain death 
three times, but doesn't that hint of his 
latent wimpiness? The ending suggests 
that the happy couple will sail to 
America for the sequel. I can wait. 

Perhaps women are not as sadistic, 
manipulative and devious as men. If 
those qualities make for exciting, 
challenging adventure games, then 
harden up, Amy. Abandon the gentle, 
nurturing nature that makes us wom- 
en and let the sequel be convoluted and 
frustrating. Give us months of ponder- 
ing and a reason to buy the hint book. 

A note to male players: You must be 
totally liberated to play Plundered 
Hearts, but go ahead, it'll do you good! 

A few uneasy questions remain. Why 
was "About the Authors" omitted from 
the manual? We want to know more 
about Amy Briggs and her back- 
ground.Why was Plundered Hearts 
kept secret until its release? Status 
Line, the Infocom newsletter, usually 
hypes upcoming titles, but I don't 
recall reading anything about Plun- 
dered Hearts there, or anywhere else, 
for that matter. Who is Amy Briggs, 
really? 

Finally, I'd like to remind you that 
never within recent recorded history 
has there been a negative review of an 
Infocom game. Their track record has 
been a miracle of success. But there's 
a first time for everything, and Plun- 
dered Hearts disappointed me. The in- 
tent is to be applauded. Women have 
long been overlooked, both as authors 
and consumers, but to grab us, you 
need a stronger hook. Let us be what 
we are today, or will be in the future— 
not what we were 300 years ago. Or, if 
you must spoof, make the spoof 
challenging enough to flatter our intel- 
ligence. Even a first-time player would 
know what to do with a sliver of mir- 
ror, a library, a chandelier. Those tricks 
have been done and done and done in 
movies, TV, and books. 

Being a feisty old feminist, I have to 
say that Plundered Hearts is one small 
step for womankind, sideways. 

Betty D. DeMunn is a profession- 
al actress and freelance writer who 
lives in Buffalo, New York. She's been 
addicted to Ataris since 1982, when 
a 400 followed her home one day, 
and grew up to be a 520ST. Other 
hobbies include: one husband, five 
children, seven grandchildren, and 
one great-grandson, Nick. Wow! 
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AText 

Enciphering 

[Program 



Part Two 



ASSEMBLY 

LINE 



by Douglas Weir 

The phrase, 
'I wandered 
lonely as a 
cloud' will be 
enciphered 
differently 
from 'I 
wander 
lonely as a 
cloud.' 



You may still be wondering what 
those cryptic words "uoou mcempun" 
at the end of last month's installment 
meant. This month we'll add to our 
program the routines needed to 
decipher that message, as well as 
smooth a few rough spots in the origi- 
nal program. 

Lost in spaces 

If you typed in, assembled, and ran 
last month's program, you probably no- 
ticed that the same text is enciphered 
differently depending on the number 
of spaces that are typed between (or, for 
that matter, in the middle of) words. 
Tabs, which are handled similarly to 
spaces, had the same effect. This 
wouldn't necessarily be a flaw if there 
were some way to work variable-sized 
space-groups into our enciphering 
scheme — in that case, it would be a fea- 
ture. But since I didn't do that, we'll 
have to call the feature a bug. 

What would be the ideal way to 
handle spaces? Assuming we're going 
to use them as separators of words, we 
don't want to filter all spaces from in- 
put. On the other hand, one space is al- 
ways enough as a separator for our pur- 
poses, so we don't need to reproduce 
groups of them. But even where we 
save single spaces from input (plain 
text) into output (enciphered text), the 
clean way to handle them would be not 
to process them at all — simply print 
them. At first glance, it seems that's ex- 
actly what was done in last month's 
program. 

Keep in mind that our encipherment 
scheme involves cycling regularly 
through a table of numbers (incs) that 
are added to the plain-text converted 
ASCII codes. The phrase "I wandered 
lonely as a cloud" will be enciphered 
differently from "I wander lonely as a 
cloud": after the "wander," the remain- 
ing characters will be affected by differ- 
ent numbers from the incs table, since 



the characters have changed, but the 
numbers (and the period of cycling) 
have not. In fact, that's what makes our 
ciphers somewhat more difficult to 
crack than the straight-substitution 
variety. . . we hope. 

In last month's program, spaces were 
not actually enciphered; they were sim- 
ply passed through and printed as is. 
But every time a space was read, the 
incs table cycle was advanced one step 
(even though the current increment 
wasn't used that time), and the effect 
was the same as if a valid character had 
been read and enciphered. That meant 
that the number of spaces, consecutive 
or not, made a difference in the en- 
ciphered text. The phrase 

Once upon a midnight dreary 
yxmj zrqp h vrmqjhrd iwjcta 

would be enciphered differently from 

Once upon a midnight dreary 
yxmj wrqu h vreojqrd iwgctf 

(there are two spaces after "Once" in 
the second example; otherwise the two 
are identical). 

What we want to do is make the en- 
ciphered output come out the same no 
matter how many spaces occur any- 
where in the input. This turns out to 
be pretty easy to do. In last month's 
program, when spaces or tabs (which 
are the same thing as far as we're con- 
cerned) were detected, execution 

branched to the label e raw and 

almost all further processing was 
skipped . . . almost all. The cycle coun- 
ters (in registers <J3 and d2) were still 
advanced. All we have to do is move the 
e raw and the line of code that fol- 
lows it to the location just before the 

label e test, and change the couple 

of branches to e test to branches to 

e raw. Now the cycle counters will 

only be affected when a valid charac- 
ter has already been processed. You 
can see these changes in this month's 

listing (the labels now begin with x 

instread of e ). 

The other thing we'd like to do, as 
mentioned above, is copy only the first 
of a consecutive group of spaces into 
the output, and ignore the rest. This is 
accomplished by setting up a "flag" 
variable. The flag is initialized with the 
value zero. Every time a valid charac- 
ter is read, 0 is written into the flag. As 
soon as a space is detected, the value 
1 is written into the flag. From now on 
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whenever a space is detected, the flag 
is checked. If it has a value of 1, then 
we know that the previous character 
also was a space, and this one can be 
ignored. If the flag has a value of 0, then 
this must be the "first" space, and it 
should be echoed in the output. 

The flag variable can be a location in 

memory, just like last ch in last 

month's program. However, it takes 
time (and sometimes an extra instruc- 
tion or two) to access memory loca- 
tions, and using a register (if there's an 
ideal one available) is much more con- 
venient. In this month's program, the 
register d7 is used as the "space flag" 
in the subroutine x cipher. 

Finally, a couple of other minor 
changes result in tabs being handled in 
exactly the same way as are spaces. 

What a different arrays make 

As for deciphering the enciphered 
text, there's not much to it beyond 
what we've already done. In fact, you 
could use the original code in en- 
cipher from the last time, and instead 
of the last four lines of code under the 
label e nxt2. type in these: 



single program and let the user choose 
which of the two he or she wants to do. 
And that's that I've done in this 
month's program. 

The subroutine encipher has been 
replaced by x cipher in the new ver- 
sion. Despite all the changes men- 
tioned above, the two routines are still 
very similar. Two more data registers, 
d6 and d7, are used. The first, d6 con- 
tains a value that tells x cipher 

whether it's supposed to encipher or 
decipher its text. The second, d7, is 
used as the "space flag" discussed 
above. Notice that now all the data 
registers are saved at the beginning of 
the routine and restored at the end, 
even though d5 isn't used for any- 
thing. If you think that it would make 

'Keep 
hacking' 
came out as 
'uoou 



keyboard for an e (encipher) 
or a d (decipher text)— uppercase let- 
ters are converted to lowercase by the 
lines of code immediately preceding 
p_nxtO. 

As soon as a valid response is 
received (otherwise prompt simply 

keeps repeating prompt msg), one 

of two values (ENC for encipher, XDC 

for decipher) is written into c flag, 

and another carriage return and line 
feed are written to the screen, so that 
the user will have a clean screen line 
to type on. This "newline" string is 
simply the end of prompt msg 
with its own label, prompt end The 
GEMDOS routines recognize only a null 
(binary zero) as a valid string termina- 
tor, so you can label "interior" parts of 
a string to your heart's content. We did 
something similar last month with 
p string and c_string. When 
c string is passed to GEMDOS func- 
tion 9, only its contents are printed 
(remember, we added the null to the 
end of c String at the very end of en- 
cipher). When p string is passed, a 

carriage return and line feed are print- 
ed (thus moving the cursor down to a 
new screen line), and, since there's no 
null (i.e.,0) until the "end" of 
c string, GEMDOS continues merri- 
ly along and prints all its contents too. 

With the space and tab-handling im- 
provements discussed above, you'll 
find that this month's program en- 
ciphers text a bit differently from last 
month's version. For example, "keep 
hacking" came out as "uoou mcem- 
pun" last time, but now it's enciphered 
as "uoou mfemkun," no matter how 
many tabs and spaces you type be- 
tween or within the words. 

There is still a lot that can be done 
with this program. One obvious and 
simple enhancement would prompt 
the user at the end and allow him or 
her to re-run the whole thing over 
again, as many times as desired. The 
amount of text processed could be in- 
creased, and screen editing could be 
added — I hate not being able to back- 
space over a mistake and retype it. File 
storage and retrieval could be added. A 
protocol for having an enciphered mes- 
sage contain its own "private" set of 
increments in a header section could 
be developed. All characters— not just 
letters of the alphabet— could be 
processed. Or some effort could be put 
into simply making the existing pro- 
gram more efficient, compact, and 
elegant. 



sub.w dl,dO subract increment 

bcc.b e nxt3 if >0, continue 

addi.w #C MAX,dO else wrap around top 



In other words, subtract the current 
increment from the enciphered text 
(thus reversing the enciphering 
process). Then you check to see if the 
result is a number less than zero. That 
wouldn't be good, since it wouldn't give 
us a valid array index (remember, we're 
going to index into the ciphers array). 
We saw last time that any time a larg- 
er number is subtracted from a 
smaller, the 68000's Carry flag is set. 
So if the Carry flag is cleared, every- 
thing's okay, and we go on to index a 
deciphered character. Otherwise we 
simply add the size of ciphers to the 
negative number we know is in dO. 
The result is the same as if we had in- 
dexed down to the "bottom" (element 
0) of ciphers and "around" the "top" 
(element 25, the exact opposite of what 
we did when enciphering. 

Making dual with one 

We now have all the ingredients we 
need to both encipher and decipher 
text. Since so much of the code for the 
two operations will be identical, it 
makes sense to combine them into a 



mcempun' 
last time, but 
now it's 
enciphered 
as 'uoou 
mfemkun.' 

sense to use d5 (instead of the memory 

location last ch) to hold the last 

character typed, you're right. Last 
month last ch was there to in- 
troduce the use of variables, but a 
register would be faster, and it would 
save time and space, too. Unfortunate- 
ly, writing it in wouldn't have helped 
me save time making the dealine for 
this issue of ST-Log. 

A second subroutine, prompt, has 
been added to handle the task of find- 
ing out what the user wants to do- 
encipher or decipher text. The prompt 
message is printed, and then the GEM- 
DOS conin function is used to read the 
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XXXXXXXXXKXXXXXXXXXKKXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
* 

* A Text Enciphering Progran — Part 2 
M 

* by Douglas Weir 
* 

* Copyright 1988, ST-Log 
* 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX j XXXX 



text 








bsr 


pronpt 




deternine node 


nove . 1 
bsr 

addq . 1 


«c_string, 
x_cipher 
*4, a7 


-(a7) 


string space address 
encipher a string 
pop arg 


nove . 1 

nove.w 

trap 

nove.u 

trap 


8p_string, 

»9,-(a7] 

Jti 

»8,-Ca7) 
ttl 


-Ca7) 


print string address 
code=print string 
do it 

code=exit progran 
do it 



xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
* x.cipher — encipher or decipher a text string, 
at entry: 

(a7) + 4 => space for storing processed string. 



* 
# 

* 
* 
x 

* 
* 
* 

N 
* 

« 

XXKKKKXXXXXXKKXXXXXXXXXXXXXXXXXXXXXKXXXXXXXXXXXXXKXXXXXXXXXXXXXXXX 



registers used 
d8 
dl 
62 
d3 
d4 
d5 
d6 
d7 



— character fron keyboard 

— elenent fron "incs" 

— index into "incs" 

— increnent phase counter 

— nain loop counter 

— not used 

— encipher/decipher flag 

— space flag 



a8, al — not used Caffected by GEMDOS calls) 



a2 
a3 
a4 
a5 
a6 



not used 
base pointer to "ciphers" 
pointer to string space 
base pointer to "incs" 
frane pointer 



at exit: 



all registers preserved. 



x.cipher: 

link 
noven . 1 

novea . 1 
novea. 1 
novea . 1 
clr.l 
clr.l 
nove . b 
nove.w 
nove.w 
nove.b 

x_loop : 



a6,»8 

dB-d7/a8-a5,-(a7) 

8(a6),a4 
«c iphers, a3 
ttincs, a5 
d2 
d7 

c_f lag, d6 
«1_PHASE, d3 
«S_SIZE,d4 
«CR, last_ch 



frane pointer 
save registers 

point to string space 
point to cipher table 
point to increnents 
reset inc index 
reset space flag 
get cipher/decipher flag 
reset phase counter 
absolute counter 
initialize last char 
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nove.w 
trap 
addq . 1 
cnpi . b 
beq 

cnpi . b 
beq . b 
cnpi . b 
bne . b 

x-space: 

cnpi . b 
beq 

nove . b 
nove.b 
bra 

x_nxt08: 

nowe . b 
cnpi . b 
bne .b 
nove . b 
nove.w 
nowe .vi 
trap 
addq . 1 
bra .b 

x_nxt8: 

nove . b 
cnpi . b 
bcs.b 
cnpi . b 
bcc .b 
addi .w 
bra .b 

x_nxtl: 

cnpi .w 
bcs.b 
cnpi .u 
bcc .b 

x_nxt2: 

subi .u 
nove.b 

cnpi . b 
beq.b 
add .w 
cnpi .w 
bcs.b 
subi .w 
bra.b 

x_nxt3: 

sub .w 
bcc .b 
addi .u 

x_nxt4: 

nove . b 
subq . w 
bne . b 
nove.w 
addq . 1 
cnpi . w 
bcs.b 
subi .u 

x_rau: nove.b 
x_test: dbra 

x_end : 

nove . b 
nove . b 
nove.b 

noven. 1 

unlk 

rts 



81, -ta7) 
81 

82, a7 
8CR, dO 
x_end 

8SPACE, dB 
x_space 
8TAB, dO 
x_nxt0O 

81, d7 
x_test 

8SPACE, last_ch 

81, d7 
x_raw 

88, d7 
8BS, d8 
x_nxt8 
last_ch, dO 
dB, -£a7) 

82, -(a7) 
81 

84, a7 
x_loop 

d8, last.ch 

8A, dB 

x_raw 

8Zl,d8 

x_nxtl 

8U_CBNU,d8 

x_nxt2 

8a, dB 
x_rau 
8zl,d8 
x_rau 



8C_C0HU,dB 
8£a5,d2.w),dl 

8XDC, d6 

x_nxt3 

dl,d8 

8C-MAX, dB 

x_nxt4 

8C_MAX, dB 

x_nxt4 

dl,d8 
x_nxt4 
8C-MAX, dB 



B(a3, dB.wl, dB 

81, d3 

x_raw 

8I-PHASE, d3 
81, d2 

ttl-COUNT, 62 
x_raw 

8l_C0UHT, d2 

dB, (a4) + 
d4, x_loop 



8LF, ta4)+ 
8CR, (a4J + 
88, (a4) 

Ca7)+,d8-d7/aB-a5 
a6 



code-conin 
do it 
pop arg 

carriage return? 
if so 

space? 
if so 

else: tab? 
if not 

nore than one? 

if so, skip everything 

else save it 

and set flag 

and write it 



reset space flag 

backspace? 

if not 

else get last char 

push it 

code-conout 

do it 

pop args 

and start over 



save raw char 
lower than "A"? 
if so, just write it 
else: upper case? 
if not 

else convert to lower case 
and continue 

non-alphabetic? 

if so, write it 

else: lower case? 

if not, write it as is 



else nake it an index 
get current increnent 

dec ipher? 
if so 

else encipher by adding inc 
over naxinun? 
i f not 

else correct it 
and continue 

decipher by subtracting inc 
if >= 8, continue 
else wrap around top 



get enciphered code 
decrenent phase counter 
if phase not exhausted 
else restart counter 
and increnent index 
over naxinun? 
if not 

else wrap around 

write it 
go till end 



append line feed 
and carriage return 
and null 

restore registers 
deallocate frane 
and return 
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XXXXXXXXXXXXXXXXXXXKKXXXXXXXXXXXXXXXXXXXXXXXXXKXXXXXXXKMXXXMMMXXXX 
M 

* pronpt — deternine function: encipher or decipher. 
M 

* at exit: 

* registers dB-dl, a8-al are changed, 
M 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 



pronpt : 

nove. 1 
nove .u 
trap 
addq . 1 

nove .w 
trap 
addq . 1 

cnpi . b 
bcc . b 
addi .u 

p_nxtO: 

cnpi . b 
bne . b 
nove . b 
bra.b 

try_dec : 

cnpi . b 
bne . b 
nove . b 
pronpt_out : 

nove . 1 
nove.w 
trap 
addq. 1 
rts 



«pronpt_nsg, -Ca7) 

tt9, -(a7J 

ttl 

tt6, a7 

ttl,-(a7J 
ttl 

82, a7 

Jta, dO 
p_nxt8 
ttU_C0NU, d6 

tte, dfl 
try_dec 
ttENC, c_f lag 
pronpt_out 

ttd,dB 
pronpt 
ttXDC, c_f lag 

ttpronpt.end, - Ca7) 

tt9, -(a7) 

ttl 

»6, a7 



pronpt nessage 
code=print string 
do it 
pop args 

code=conin 
do it 
pop arg 

is letter < 'a'? 
if not 

else convert 

'e' = encipher? 
if not 

else set flag 
and leave 

'd' = decipher? 

if not, keep trying 

else set flag 

newl ine 

code=print string 
do it 
pop args 
and return 



***** 
* 

* data area 
* 

M w w w w 

data 

pronpt_nsg dc.b 'Type <e> to encipher, <d> to decipher' 

pronpt.end dc.b 18,13,8 



last_ch 
c_f lag 

p_string 
c_string 
S.SIZE 

c iphers 
C_MAX 
C.CONM 
U_C0NU 

incs 

I_C0UNT 

I_PHASE 

A 

Zl 
a 

zl 

e 

d 

XDC 

ENC 

CR 

LF 

TAB 

BS 

SPACE 



ds.b 
ds.b 



1 
1 



holds last char typed 
signals cipher or decipher 



dc.b 18,13 line feed, carriage return 

ds.b 188 space for enciphered string 

equ *-c_string length of string 

dc . b ' abcdef ghi j klnnopqrstuvwxyz ' 

equ *-ciphers length of table 

equ 97 'a' - 97 = 8 

equ 32 'A 1 + 32 s ' a ' 



dc.b 18,5,2,7,9,1 
equ *-incs 
equ 3 



ciphering increnents 
size of table 

3 chars enciphered per inc 



equ 
equ 
equ 
equ 
equ 
equ 

equ 
equ 
equ 
equ 
equ 
equ 
equ 



65 

91 

97 

123 

181 

188 

77 

88 

13 

18 

9 

8 

32 



ASCII 
ASCII 
ASCII 
ASCII 
ASCII 
ASCII 



■A' 
■Z 1 
'a' 
■z" 
■e 1 
■d 1 



+ 1 
+ 1 



flag value for deciphering 
flag value for enciphering 
carriage return 
line feed 
tab 

backspace 
space 
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USER 



It feels great to be back in the saddle 
again. ST-Log is back on schedule, with 
new backing, a more professional look 
and all systems go. Renewing my con- 
tacts and friends on Delphi (my user ID 
is ARTL) and on CompuServ (My ID is 
71266,46) has been fun, and I look for- 
ward to spending more time talking 
with ST users about the topics that con- 
cern all of us. 

Diamond in the rough 

When I first heard that Abacus Soft- 
ware was preparing a word processor 
for the Atari ST computer, I thought to 
myself, Oh, no, not another one. All too 
often a company that does one thing 
well attempts to go back to the well and 
compete with still another word proces- 
sor, terminal program or whatever. I'm 
happy to report that Abacus not only 
excels in the technical ST book 
category— they are clearly the best and 
the most prolific publisher— but that 
they also have a very good word proces- 
sor. My fears, it seems, were unfounded. 

Like several other Abacus products, 
Text Pro was originally written by 
Data Becker, a German software pub- 
lishing company. The three program 
authors are all professional writers, we 
are told, so the program reflects what 
they wanted in a word processor. 
Although the apparent translation of 
the documentation is adequate, I would 
have expected a little more substance, 
especially from professional writers. 

Text Pro is a fully GEM-based word 
processor with drop-down menus locat- 
ed across the top of the screen, windows 
with vertical and horizontal scroll bars, 
and access to any Desktop accessories 
you may have already loaded when you 
booted up the ST. However, once you 
learn the program, you can use key- 
board commands instead of "mousing" 
around. Text is entered in a continuous 
stream, with formatting commands 
embedded within the text. Although it 



by Arthur Leyenberger 

is not a what-you-see-is-what-you-get 
(WYSIWYG) program, the appearance of 
your document on the screen is simi- 
lar to the final paper output. 

An essential part of Text Pro is what's 
called the Format Template. This is 
where you can change the appearance 
of a document to be printed. A Format 
Template is saved with the text file and 

Piracy is not 
new to the 
Atari or 
any user 
community. 

determines the number of lines per 
page, line spacing, margins, header and 
footer spacing, column width and num- 
ber of columns (for multiple-column 
printing) per page. Many format tem- 
plates can be saved on your disk, since 
the "look" of a letter differs from that 
of a report or term paper. 

Text Pro is capable of a few more out- 
put tricks. Text can be printed vertical- 
ly (normal) or horizontally to either the 
printer or a file. In addition, a file can 
be saved as a "text design" file. Here, the 
output is saved as a bit-mapped 
representation of the screen for further 
editing by Text Designer, another 
Abacus product. By use of a "place- 
holder" command, a second file may be 
merged with your text using the output 
program. 

There is a special feature for C 
programmers too. In this mode braces 
are automatically indented. This feature 
and the 30 programmable function 
keys make programming in C much 



easier. 

The first Text Pro feature that grabbed 
my attention was the ability to print in 
multiple columns. All of the first- 
generation ST word processors lacked 
this feature (except for ST-Writer, 
which was somewhat bugridden). Now, 
newsletter editors in particular, or any- 
one else on a tight budget for that mat- 
ter, can take advantage of formatting 
your text in however many columns 
you require. The procedure is straight- 
forward and the results are impressive. 

Text Pro provides the usual block, 
search and replace, word wrap, justifi- 
cation and other word-processing func- 
tions you would expect with this type 
of program. In addition, certain text at- 
tributes, such as normal or bold print, 
are displayed on the screen. An upper- 
lower case toggle lets you switch text 
from one to the other, and the system 
date and time can be inserted anywhere 
in the text. 

Text Pro comes out of the box ready 
to work with an Epson compatible 
printer. If you have some other type of 
printer you'll have to customize the pro- 
gram for that printer or embed printer 
codes within the text. The first option 
entails creating a printer driver by 
modifying the default Epson driver sup- 
plied with the program. There are two 
ways to approach this. In one, you copy 
the original driver file to another file 
name (as backup) and modify the origi- 
nal, since Text Pro is looking for that 
(original) specific filename. Alternative- 
ly, the program has an output feature 
that lets you choose from a number of 
printer drivers already created. In 
either case, you have to create a new 
driver for your non-Epson printer— 
although it is not difficult. 

A pair of additional utility programs 
are supplied with Text Pro in order to 
make it more useful. SPLIT is a program 
designed to split a very large file in half, 
and split those halved files in half, un- 
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til you have files of a manageable size 
for the amount of memory remaining 
in your ST. The other program, CONV, 
lets you convert files from other word 
processors, such as 1st Word, into 
Text Pro format. Page breaks and text 
attributes are acknowledged and carri- 
age returns at the end of lines are 
changed to floating text. Both of these 
programs are run outside of Text Pro. 

Drawbacks 

There are several missing features in 
this word processor. First off, there is 
no Undo function. Once you erase 
something, it's history. There is no way 
to save a file under a different name 
while editing a document. Often, you 
want to take a file, make a few changes 
here and there and save it under a 
different name. Text Pro forces you to 
copy the file first, from the GEM Desk- 
top, then edit the newly created file. No 
major problem, merely a minor hassle. 

There is no way to specify a last page 
to print when printing to the screen or 
the printer since the program prints 
from a starting page to the end. Further 
frustration occurs because there is no 
graceful way to stop the printout. There 
is no provision for a clipboard or second 
window to aid text editing and copying. 
And there is no on-line help. 

Bottom Line 

Despite the few flaws (really only 
missing features rather than bugs), Text 
Pro is a useful, second-generation word 
processor for the Atari ST. Its ability to 
print two-line headers and footers, dis- 
play output on the screen, print 
multiple-column text and perform log- 
ical hyphenation makes the program 
one of the best currently available for 
the ST. In addition, such features as 
sorting, indexing and creating a table of 
contents make Text Pro worthy of your 
serious attention when choosing a word 
processor. Also, its list price of under 



$50 won't require a second mortgage on 
the condo. 

More WordPerfect and Piracy 

Recently, CompuServe was abuzz 
with the potential withdrawal of a major 
ST software publisher. WordPerfect 
Corp. had contacted SYSOP Ron Luks 
and told him that because of software 
piracy, they were planning to remove 
the word processor WordPerfect 
from the ST market. Never in my five 
years of using CompuServe have I seen 
such a quantity of responses to Ron's in- 
itial message. It all culminated in a CO 
(conference) with several WordPerfect 
representatives and about 50 Com- 
puServe users to discuss the issues. 

Piracy is not new to the Atari or any 
user community. It has the potential for 
drying up the supply of software and 
hurting those legitimate users who paid 
for their hardware and the software 
they used. In fact, some people believe 
that the lack of 8-bit Atari software is 

We had 
better put a 
stop to piracy 
now. 

due directly to the amount of piracy 
that has occurred for years in this 
market. 

Anyway, it seemed that WP Corp. had 
discovered several pirate bulletin 
boards that were making their Word- 
Perfect program freely available to any- 
one that called. This had (understanda- 
bly) upset them, and they decided that 
the ST software market was one that 
they no longer wanted to participate in. 
As it turned out, the decision to leave 
the ST market had not been made at 
that point, and the positive responses 
from CompuServe members helped per- 
suade WordPerfect Corp. that the 
majority of ST users are not thieves. 

However, a number of interesting and 
significant points were raised in the 
message base and also when I spoke to 
Todd Ashman (Director of Atari market- 
ing for WP) and Jeff Wilson (manager 
of Atari Development for WP). One point 
that was repeatedly made by the WP 
folks is that the initial release of Word- 
Perfect had a number of bugs in it. They 
freely admit that it was released prema- 



turely and was not thoroughly tested. 
Because of the relatively high price 
($395 list, average street price about 
$250) and the type of excellent (my 
words) support given to their products, 
WP was able to release two upgrades to 
all registered users at no charge to 
them. They have also provided toll-free 
support lines to help users install and 
use the product. 

Although there were no major bugs 
in the software, there were quite a few 
little things that would accumulate and 
ultimately crash the program. The 
printer support section of the program 
has been rewritten to match the func- 
tion of the PC version and have less 
variability in operation. Some of the ST 
operating-system calls had to be redone 
and replaced in order to prevent the 
program from hanging, due to bugs in 
the Atari operating-system software. 

Another version of WordPerfect, 
which was due to be released during the 
last week of March, is said to be virtual- 
ly problem-free. All registered users will 
receive this upgrade automatically, at 
no cost to them. The latest version of 
the program will also incorporate many 
suggestions from users to improve its 
operation. 

The piracy issue basically comes 
down to the fact that the PC market is 
50 times bigger than the ST market. In 
this market, even a large percentage of 
piracy does not prevent the company 
from making a profit. Unfortunately, 
the smaller ST market feels the effects 
of piracy first. Piracy has the effect of 
causing a proportionately larger percen- 
tage of lost sales. 

WordPerfect is currently the only 
major-league software publisher that 
has a product in the Atari ST market- 
place. That's major league, as in MS-DOS 
software publisher selling a product 
consistently in the top ten list. If we as 
ST users wish to continue to have com- 
panies like WordPerfect, with their high 
level of support, quality product (now), 
and open-minded attitude support our 
computers in the future, we had better 
put a stop to piracy now. 

It's one thing to be against stealing 
software yourself and not do it. But we 
all need to be vocal about it and spread 
the word. Atari users are not necessar- 
ily any worse than other computer 
users when it comes to piracy. But the 
bottom line is that stealing software is 
not only wrong, it can have harmful ef- 
fects on the longevity and health of 
your computer. 

Piracy. Just say no. /!f 
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MAGNAVOX 



8CM873 

MULTI-SYNC 



3 



• Multimode 
text/graphics 
design permits operational compatibility with 
all current computer standards 

• Raster scan operation in 3 frequency bands 
from 15kHz to 34kHz 

• Accepts RGB video in digital and analog form 

• Accepts line level audio input 

• Image resolution of up to 926 dots (horizontal) 
and 580 lines (vertical) 

• Green text mode display switch 

• Convenient tilt/swivel base available 

2 year warranty 

$ 475 

EGA Card - $125 

8CM515 
New 

*269.95 

Cable 515 Magnavox to 
Amiga Computer - $ 13.95 



MURATA FAX MACHINES NOW IN STOCK. 
CALL FOR PRICING. 




cronies 




NX1000 

NIC? - 36 CPS 
DRAFT - 1 44 CPS 




B€ST PMC€ CALL 

NX1 000 Rainbow Color Printer - Call 





$ 79.95 




7BM623 PC Monitor 80 

• 12" Monochrome TTL input monitor • Long 
perslstance LA Amber phosphor • Dark glass 
CRT • Non-glare treated faceplate • 22MHz 
amplifier bandwidth • Displays 2000 char- 
acters, 80 x 25 • 1000 lines of resolution 



Modems 

2400 Baud External 139.95 
2400 Baud Internal 139.95 

1200 Baud External 79.95 
1200 Baud Internal 64.95 




100?r Hayes Compatibility 
Hayes is a Registered Trademark of Hayes 
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SUPER SPECIAL 

OF THE MONTH 

2400 Internal Modem 
100% Hayes Compatibility 



*119 




Cables 

IBM Parallel Cable 6' 5.99 

IBM Parallel Cable 10' 7.99 

M-M RS232 Cable 6' 7.95 

M M RS232 Cable 10' 8.49 

M-F RS232 Cable 6' 7.95 

M-F RS232 Cable 10' 8.49 

IBM Modem Cable 6' 5.99 

IBM Modem Cable 10' 7.99 

IBM at Modem Cable 5.99 

M-M Centronics 6' 11.95 

M-F Centronics 11 .95 

M-M Centronics 10' 12.95 

IBM Keyboard Extension 4.99 

Monitor Extension-DB9 M-F 11.95 

Monitor Cable-DB9 M-M 11.95 

IBM Color RGB Cable-DB9 Cable to 

8 Pin Din 12.95 

Mac* to Imagewriter 9.99 

Mac* to Imagewriter II 9.99 

Mac to Hayse 9.99 




ce Automation^^vf^ 

KXP 1080 II 
$17495 

Economy and quality work together in the KX-P1080 
dot matrix printer. Economy, because the KX-P1080 is 
priced to suit even a modest budget. Quality, because 
it's from Panasonic. With a 2-year-limited warranty to 
back it up. So come and see the KX-P1080 - it's a great 
value worth a closer look. 

• Prints 100 cps in draft mode 

• Near Letter quality printing 

• Operator accessible print mode switch 

• Dot addressable graphics 

• 2-year limited warranty 

• Word processing functions 
(justification, centering, margin alignment) 

KXP1091II- $ 194 95 

Call for pricing on other models 

Accessories 

A/B DB9 Switch Box 32.95 

ABCD DB9 Switch Box 49.95 

A/B Telephone Switch Box RJ 11 34.95 

Serial Cross-Over Switch Box 39.95 

Parallel Cross-Over Switch Box 39.95 

M-M DB9 Gender Changer 5.95 

F-F DB9 Gender Changer 5.95 

A/B Parallel Switch Box 22.95 

A/B Serial Switch Box 22.95 

A/B/C/D Parallel Switch Box 39.95 

A/B.'C/D Serial Switch Box 39.95 

6 Outlet AC Surge Pr 9.95 

B-109 Parallel Card 29.95 

B-106 Serial Card 26.95 

Male/Male Gender Chg 5.95 

Feml/Feml Gender Chg 5.95 

Winner 200 11.99 

Winner 104 4.99 

Winner 770 Com/Atari 11.95 

Winner 909 Apple/IBM 23.95 

Winner 220 Joystick 13.95 

500XJ Atari/Comm 14.95 

Competition Pro 5000 14.95 

Kraft Apple/IBM KC 3 24.95 

Mazemaster Atari/C64 14.95 

#31 Apple Mouse 32.95 

Starmaster Joystick 5.49 

Joystick Ast Ada. Kit 27.95 

Kraft Ace Joystick 5.49 

Kraft Premium 2 IBM 26.95 

Apple Mach 3 Stick 12.95 

Apple Kraft Stick 8.95 

Mouse Joystick 12.95 

Competition Pro 15.95 

Suncom Slik Stiks 5.99 

Suncom Econo Stik 4.99 

Suncom Tac 2 9.99 

Suncom Tac 3 11.99 

Suncom Tac 5 13.95 

Suncom Starfighter 17.85 

Icon Controller 15.99 

j ac 1 4- 24.95 

Starfighter IBM . . . . . . . . . . . . . . 17 85 

Starfighter C64/Atar 8.95 

Terminator Joystick 19.95 



• Kul I mamil'arliirrr warranty. 

• Personal eheek W weeks rlearanee. 

• I Ct - 1 11 tn authorization required. 

• I'riees show ."{' < rash diseount. 

• ( niiipat ihil il v not nuai antccd. 

• COI> aeeepted. 

AIM), Kl»< ), International: add $-~> plus:!' - priority. 
No sales lax outside N.Y. 
IVires/availaltilitv subject to i-han^e. 



CIRCLE #106 ON READER SERVICE CARD. 



Disk Drives that are Setting 
new Standards for ST Enhancements 




Performance 



Styling 



Reliability 



- Introducing the 5H" Disk Drive for the Atari ST 
Computer Systems. 

- The smoked glass dust cover protects the GT's 
front loading front end. Preventing both dust and 
misguided fingers. 

- The GT's Accutouch buttons and LED lights 
provide absolute feedback. Giving you positive 
assurance that data integrity has been preserved. 

• When the GT's Protect LED is lit, your drive will 
not be able to write on diskettes. Electronically 
or mechanically. Protecting, you and your pro- 
gram from "Driver Error" 

The GT-1000 comes with an external power 
supply and is available in either 40 Track, 360 k. 
capacity or 80 Track 720 k. capacity. (Optional) 




The all new 1988 GT disk drives. 



- The GTS- 100 is sleek and perfectly propor- 
tioned. Eye catching. Distinctively European 
Gran Styled. 

- The front panel display, track readouts. Optimiz- 
ing your concentration. Eliminating doubt and 
second guessing. 

- The busy LED notifies when your ST is using the 
GTS-100. And it also doubles as a warning not to 
remove your diskette or power-off your system 
while it is lit. 

- The 3W Diskette transport has been equipped 
with the GTS Cruise Control head positioning 
mechanism - the lowest friction, highest accuracy 
positioner available. 

The GTS is dual sided, double density floppy 
disk drive with a 720 k formatted storage capacity. 

Comfortable. Impressive. Friendly. Three excel- 
lent reasons to go see and test drive the new 
GTS-100 at your ST dealer today. 



SYSTEMS, INC. 



SERVICE 



VALUE 



QUALITY 



ATARI ST is a trademark of ATARI Corp. 



For dealer information call: (818) 407-1647 



GTS-100 & GT-1000 is a trademark of & is manufactured by F.S.I., 21634 Lassen, Chatsworth, CA 91311 
CIRCLE #107 ON READER SERVICE CARD. 



